Shortcut to popout cdtray continously

Its a simple notepad trick to popout your Cdtray continously. Its fun n intersting trick by using Notepad. Copy the content below in your notepad,

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

Save this in .vbs format. Ex. cdtray.vbs

Thats it, you done,,now double the saved file. your cd tray pops out automatically. 

If you want to stop this means,  Open Task Manager(Alt+Ctrl+Delete), Under Processes end the process “wscript.exe”

Tweet