How TO Open CD Tray Only 1 click

by Unknown 8:41 AM 0 comments

(a .vbs scrip file, you may put this file on your desktop and execute it whensoever you want to open the CD tray)

1.Open your text editor (notepad or notepad++),whichever you use..!! 

2.Paste the code below into it.

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count = 1 then
for i = 0 to colCDROMS.Count - 1
colCDROMs.Item(i).Eject
colCDROMs.Item(i).Eject
Next ' cdrom
End if

3.Put "File" "Save As". and save as
.vbs (exactly, with the dot)

4.save it to your desktop, and enjoy!