There is a little free program called Wizmo. Make a shortcut
"Wizmo open" and it opens the cd drive (or ejects it). You can also
make a "Wizmo reboot", Wizmo shutdown, "Wizmo hibernate" and many other
system command shortcuts.
These two .vbs files will open the trays on D: and E: drives.
Copy the lines below into Notepad, not including the ---- parts.
Save as ejectD.vbs
-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("D:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------
Copy the lines below into Notepad, not including the ---- parts.
Save as ejectE.vbs
-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("E:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------
There is one difference in the two, ("D:\") and ("E:\") are the drive
letters. These can be changed to any CD or DVD drive letter.
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.