Just for fun, you can use the following script to open CD drawers:
Dim WMP: Set WMP = CreateObject("WMPlayer.OCX.7")
Dim CDROMs: Set CDROMs = WMP.cdromCollection
If CDROMs.Count >= 1 Then
For i = 0 to CDROMs.Count - 1
CDROMs.Item(i).Eject
Next
End If
Set WMP = Nothing
Set CDROMs = Nothing
WScript.Quit
Cut and paste the script into an editor, save it as cdeject.vbs You can run it from the cmd window or the run box. You must include the vbs extension when you run it.
If your machine is DOS only, you will need to look into the DEBUG command...not for beginners

For even more fun, checkout the SHUTDOWN command to turn off your machine. SHUTDOWN /? will give you all the parameters you may need.
Hope this helps.
