-->
Welcome To Team Hacker This Blog Created By Ryan Cracker Dont Forget To Follow Or Coments My Entri's

Saturday, October 1, 2011

OTOMATIS BUKA NOTEPAD LALU NGETIK "APA YG LO MAU":

WScript.Sleep 1800
WScript.Sleep 100
Set WshShell =
WScript.CreateObject
("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 10
WshShell.AppActivate "Notepad"
WScript.Sleep 50
WshShell.SendKeys "ka"
WScript.Sleep 50
WshShell.SendKeys "mu "
WScript.Sleep 50
WshShell.SendKeys "je"
WScript.Sleep 50
WshShell.SendKeys "le"
WScript.Sleep 50
WshShell.SendKeys "k "
WScript.Sleep 50
WshShell.SendKeys " se"
WScript.Sleep 50
WshShell.SendKeys "ka"
WScript.Sleep 50
WshShell.SendKeys "li"
WScript.Sleep 50
WshShell.SendKeys " y"
WScript.Sleep 50
WshShell.SendKeys "a"
WScript.Sleep 50
WshShell.SendKeys " h"
WScript.Sleep 50
WshShell.SendKeys "!"
WScript.Sleep 50
WshShell.SendKeys "!! "

==> save nama script diatas dg ekstensi *.vbs

0 comments:

Post a Comment