CD/DVD ROM Ejecting Prank (Fun with Virus)

Note: This is only a small script and won't cause any damage

Follow the steps:

• Copy the below code
• Paste it in your notepad
• Save it as in .vbs after your desired name, for e.g virus.vbs

Code(the highlighted area)

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


That's it..... !!
Now as you have saved it, just double click on it, and see your CD/DVD tray coming out, going in, coming out, going in loop. You can change the values in(red) the above code to your choice.

I know what you are thinking now, what if something gets damaged, no friends Don't worry you can trust me blindly. It won't do any damage to your Hardware or Softys.

To disable this go to task manager, click on process tab, then find wscript.exe and then right click on it and select end process.

Now to trap your friends, rename the file to something kool so that your friend clicks on it. Send it to your Friends And enjoy your way !

This entry was posted in Cd, Dvd, Prank, script, Task manager, vbs, wscript.