CD Player Trick

Hi! friends following is a VB script for opening & closing the CD player continuously with just 1 click. Copy the code given below and save it with name xyz.vbs and enjoy the magic by executing it.

Set oWMP = CreateObject(“WMPlayer.OCX.7”)
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
do
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next ‘ cdrom
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next ‘ cdrom
loop
end if

This is just VB script so you can stop this by ending the process named “Wscript.exe” from the task manager. And these tricks might not work with windows Vista.

Advertisements