Rabu, 25 Januari 2017

NotePad Nulis Sendiri

Spirit Pagi.......
Kali ini Kita isengi Teman Yuk...dengan membuat Notepad Nulis Sendiri.....
kok Bisa Ya?....ya Bisalah......mau tau Caranya Sob?.....langsing Di Coba ya?


  • Buka Notepad Sob....
  • Tuliskan Script Berikut

WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "agus"
WScript.Sleep 500
WshShell.SendKeys "anak "
WScript.Sleep 500
WshShell.SendKeys ", ba"
WScript.Sleep 500
WshShell.SendKeys "ik"
WScript.Sleep 500
WshShell.SendKeys "dan "
WScript.Sleep 500
WshShell.SendKeys "ra"
WScript.Sleep 500
WshShell.SendKeys "mah "
WScript.Sleep 500
WshShell.SendKeys "ta"
WScript.Sleep 500
WshShell.SendKeys "mah"
WScript.Sleep 500
WshShell.SendKeys "ti"
WScript.Sleep 500
WshShell.SendKeys " dak"
WScript.Sleep 500
WshShell.SendKeys "na"
WScript.Sleep 500
WshShell.SendKeys "kal "

  • Simpanlah Dengan Extension VBS
  • Begitu File di buka maka Notepad akan Menulis Sendiri
  • Untuk Contoh Bisa di Download disini DOWNLOAD HERE

Tidak ada komentar:

Posting Komentar