Make the DVD drive go in and out

This trick will make your dvd drive go in and out automatically. However this may not work in laptops as once the drive is opened it has to be closed manually, but this will work in a different way if any one try to close the drive in laptops it will open automatically.

Copy this script in a notepad:::

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

and now save it as run.vbs

guys, to stop this just open task manager and in processes tab u can see wscript.exe, rightt click on it select "end process tree "!!! dats it !! the loop wll now stop !! dont select "end process " as it wll not stop the loop !!! 

cheers..