Funny VBS Script Prank

Add This To Del.icio.us Share on Facebook StumbleUpon This Add to Technorati Digg This

Here is a Funny vbs script which you can play on your friend computer.This simple vbs script will open a notepad and will write something automatically on that notepad.Just copy this vbs script paste it on notepad and save it as anyname.vbs extension.Then send this file to your friend to play a prank.Chane the vbs script according to your need or fun.

WScript.Sleep 180
WScript.Sleep 100
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 "you"

WScript.Sleep 500

WshShell.SendKeys "r sy"

WScript.Sleep 500

WshShell.SendKeys "stem"

WScript.Sleep 500

WshShell.SendKeys "hac"

WScript.Sleep 500

WshShell.SendKeys "ked"

WScript.Sleep 500

WshShell.SendKeys " Ateam"
WScript.Sleep 500
WshShell.SendKeys "Rock"
WScript.Sleep 500
WshShell.SendKeys "s! "

For Further Reading,

Fun Tricks