Description: This is a harmless code, which will pop out your cd drive automatically, and when you push it back, it will pop out again and again,
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
Testing:- You can test this code on your own system also, as its a harmless code. Just copy the entire code, paste it in notepad, and save it with any name having extension .vbs, and then double click to run/test it.
Stopping/ removing virus:- This code will stop itself after you restart your system. or Just delete the process wscript.exe from the task manager to stop it.