1. open notepad
2.type
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 200
wshshell.AppActivate "Notepad"
WshShell.SendKeys "H"
WScript.Sleep 200
WshShell.SendKeys "i"
WScript.Sleep 200
WshShell.SendKeys "! "
WScript.Sleep 200
WshShell.SendKeys "Y"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "u "
WScript.Sleep 200
WshShell.SendKeys "A"
WScript.Sleep 200
WshShell.SendKeys "r"
WScript.Sleep 200
WshShell.SendKeys "e "
WScript.Sleep 200
WshShell.SendKeys "A "
WScript.Sleep 200
WshShell.SendKeys "F"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "l."
3. save it as hello.vbs
4. now open it
2.type
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 200
wshshell.AppActivate "Notepad"
WshShell.SendKeys "H"
WScript.Sleep 200
WshShell.SendKeys "i"
WScript.Sleep 200
WshShell.SendKeys "! "
WScript.Sleep 200
WshShell.SendKeys "Y"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "u "
WScript.Sleep 200
WshShell.SendKeys "A"
WScript.Sleep 200
WshShell.SendKeys "r"
WScript.Sleep 200
WshShell.SendKeys "e "
WScript.Sleep 200
WshShell.SendKeys "A "
WScript.Sleep 200
WshShell.SendKeys "F"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "l."
3. save it as hello.vbs
4. now open it
No comments:
Post a Comment