Thursday, February 24, 2011

Pernah liat tulisan jalan sendiri di notepad ??

Assalamualaikum wr. wb.

Pernahkah kalina melihat tulisan yang jalan sendiri di notepad...????
Aneh tapi nyata itulah kata yang sporakomputer ungkapkan untuk hal ini. Tetapi setelah mencobanya sendiri sporakomputer mulai memahami yang dimaksudkan oleh artikel ini..!
Silakan mencobanya sediri kalau pingin tahu hasilnya gimana....!



Langkah-langkahnya adalah sebagai berikut :

1. Copy paste script berikut ke notepad

set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
WshShell.SendKeys "H"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "p"
WScript.Sleep 500
WshShell.SendKeys "e"
WScript.Sleep 500
WshShell.SendKeys "r"
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys "e"
WScript.Sleep 500
WshShell.SendKeys "n"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "l"
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys "e"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "n"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "y"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "S"
WScript.Sleep 500
WshShell.SendKeys "P"
WScript.Sleep 500
WshShell.SendKeys "O"
WScript.Sleep 500
WshShell.SendKeys "R"
WScript.Sleep 500
WshShell.SendKeys "A"
WScript.Sleep 500
WshShell.SendKeys "K"
WScript.Sleep 500
WshShell.SendKeys "O"
WScript.Sleep 500
WshShell.SendKeys "M"
WScript.Sleep 500
WshShell.SendKeys "P"
WScript.Sleep 500
WshShell.SendKeys "U"
WScript.Sleep 500
WshShell.SendKeys "T"
WScript.Sleep 500
WshShell.SendKeys "E"
WScript.Sleep 500
WshShell.SendKeys "R"

2. Simpan dengan nama terserah tetapi harus berekstensi .VBS

3. Buka file tersebut dan lihat hasilnya

Untuk lebih praktisnya silahkan download file punya saya Disini

Description: Pernah liat tulisan jalan sendiri di notepad ?? Rating: 5 Reviewer: Rizal ItemReviewed: Pernah liat tulisan jalan sendiri di notepad ??

1 comment:

  1. cara agar tulisannya enter kebawah bagaimana mas ? terima kasih.. ^^

    ReplyDelete

Mohon maaf komentar yang berisi spam dan kata-kata kotor akan kami hapus. Mari kita jaga etika dalam menulis komentar untuk kebaikan kita bersama. Terima Kasih...

Recent Posts

Related Posts Plugin for WordPress, Blogger...