Pop out the CD Drive continuously

Open Notepad, type the following code and save the file with extension .vbs Then open the file. It will make CD drive pop out continuously. To stop the process, open Windows Task Manager (Ctrl+Alt+Delete) and end wscript.vbs process. 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