Sunday, August 24, 2014

Funny vbscript to text robotically

2:29 PM Posted by Dhakshnamoorthy D No comments
Step 1:-Open Notepad.
Step 2:-Type the following code
set wshshell = wscript.CreateObject("wScript.Shell")
wshshell.run "Notepad"
wscript.sleep 1400
wshshell.sendkeys "D"
wscript.sleep 1000
wshshell.sendkeys "O"
wscript.sleep 1000
wshshell.sendkeys "N"
wscript.sleep 1000
wshshell.sendkeys "T"
wscript.sleep 1000
wshshell.sendkeys "R"
wscript.sleep 1000
wshshell.sendkeys "E"
wscript.sleep 1000
wshshell.sendkeys "A"
wscript.sleep 1000
wshshell.sendkeys "D"
wscript.sleep 1000
wshshell.sendkeys "T"
wscript.sleep 1000
wshshell.sendkeys "H"
wscript.sleep 1000
wshshell.sendkeys "I"
wscript.sleep 1000
wshshell.sendkeys "S"
Step 3:-Save the file as "Filename.vbs"
Step 4:-Now Open the saved file to see the magic.

Reactions:

0 comments:

Post a Comment