Computer Tricks

Create a Harmless Funny Virus with Notepad Continously -Eject CD/DVD Drives

Friendss here is funny trick by using the codes you will to make prank in friend system it fully harmless . By this trick will create a code which will continously eject your optical drive . if you put them back in , the pop them out again .


Copy and Paste Following Codes in Notepad and Saves as Virus.Vbs or by any name.vbs.


Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do

cd rom

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



Double click to open this file  . Enjoy .