The top 5 most dangerous VBScript to prank your friends. So let start play with your friends. All the Scripts are save on Notepad .
1. Shut Down Prank-
This is the most famous Prank. In this script we make a script and give command to
@echo off
start iexplore http://www.b04-team.net
echo Hi, Like this website and Share this Website on FaceBook
echo did u say no???????????
pause
shutdown -s -t 50 -c "Sorry You are Hacked"
Save it any name with .bat extension
2. Automatically Open and Close your CD-ROM Prank:-
In this Prank the CD-ROM will automatically open .
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
Save it any name with .vbs extension
3. Hack the Keyboard and Send Same Msg Continuous Prank:-
In this Prank we sleep or pause the keyboard and send one msg continuously such as ‘You are Hacked!!!’
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "You are Hacked."
loop
Save this to any name with .vbs extension
4. Toggle Caps Lock Simultaneously Prank:-
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Save with .vbs extension.
5. Hit Backspace Simultaneously As Press Any Key Prank:
In this prank when we press any key, at the same time the Backspace also press automatically.
MsgBox "You are Wrong Again Type"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Save it with .vbs extension.
