Pesen berjalan di notepad

Baru ponya ide nee tadi malem untuk gabungin script² iseng buat kompi/ PC or tenktop..

Sebenernya ga gitu penting si.. tapi lumayan neh buat iseng ato buat kasi peringatan di PC or plesdis..





Cara kerjanya sederhana banget kok..


cuma tinggal diedit ajah dr script yg saiah kasi inih..





untuk contoh file-nya bisa didonwload diSINI





Ada baiknya kalian liat dulu contohnya.. tenang aja ga usah kaget apa yang ada dalem file itu..

itu hanya semata-mata iseng belaka..

Untuk script-nya kalian copy aja yang dibawah ini...






Set wshshell = wscript.CreateObject("WScript.Shell")

Wshshell.run "Notepad"

wscript.sleep 400

wshshell.sendkeys "H"

wscript.sleep 100

wshshell.sendkeys "i"


wscript.sleep 200

wshshell.sendkeys " "

wscript.sleep 200

wshshell.sendkeys "I"

wscript.sleep 200

wshshell.sendkeys " "

wscript.sleep 100

wshshell.sendkeys "a"


wscript.sleep 100

wshshell.sendkeys "m"

wscript.sleep 200

wshshell.sendkeys " "

wscript.sleep 100

wshshell.sendkeys "S"

wscript.sleep 100


wshshell.sendkeys "U"

wscript.sleep 100

wshshell.sendkeys "K"

wscript.sleep 100

wshshell.sendkeys "M"

wscript.sleep 100


wshshell.sendkeys "A"

lol = msgbox("PESAN_KAMU")





Edit yang saia kasi warna merah,, lalu save dengan format .vbs, misalnya "klik aja.vbs" ...itu juga bisa kalian kembangun lagi.. silakan ajah dirombak sesuka ati..

Baca Juga Yang Lainnya: