⚠Create a harmless virus to continuously eject CD/DVD drives ⚠ 1. Open notepad and copy the code given below: 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 2. Save the file with any name you want and the extention .vbs (eg. Virus.vbs) 3. Double click to open the above file and your small virus will continuously eject all your connected Optical drives even if you put them back in, it will pop them out again. P.S- To close the above virus trick, open task manager and close the wscript.exe process.