TRIK-TRIK DENGAN MENGGUNAKAN NOTEPAD UNTUK MENJAHILI TEMAN

10 Trik Notepad Untuk Ngerjain Teman


Berikut ini beberapa script sederhana yang mungkin bisa anda coba2 saat bermain notepad:
1. Membuka dan menutup CD/DVD Komputer

Copy script dibawah ini dan paste di notepad anda.

Set oWMP = CreateObject(“WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

Simpan dengan format *.vbs.
Lalu Buka File Tersebut


2. Menulis otomatis di notepad
Copy script dibawah ini dan paste di notepad anda.

@ECHO off
:Begin
msg * hahahhaa
msg * santai boss
msg * ini hanya main-main
msg * jangan marah ya
msg * hanya bercanda
GOTO BEGIN

Simpan dengan format *.bat.
Lalu Buka File Tersebut


4. Membuat Komputer Shutdown dengan muncul pesan.
Copy script dibawah ini dan paste di notepad anda.

@echo off
msg * Hahahahhaha
shutdown -s -c “Komputer anda mati”

Simpan dengan format *.bat.
Lalu Buka File Tersebut


5. Membuat Tombol Capslock terus menyala
Copy script dibawah ini dan paste di notepad anda.

Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop

Simpan dengan format *.vbs.
Lalu Buka File Tersebut


6. Membuat terus – menerus menekan tombol “backspace”
Copy script dibawah ini dan paste di notepad anda.

MsgBox “Kembali ke menu sebelumnya”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

Simpan dengan format *.vbs.
Lalu Buka File Tersebut


7. Membuka notepad Terus – menerus
Copy script dibawah ini dan paste di notepad anda.

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Simpan dengan format *.bat.
Lalu Buka File Tersebut


8. Bikin vbscript nongol mlulu
Copy script dibawah ini dan paste di notepad anda.

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Simpan dengan format *.bat.
Lalu Buka File Tersebut


9. Otomatis ngetik "lu jelek banget sih" di notepad/word
Copy script dibawah ini dan paste di notepad anda.

Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Lu jelek banget sih!!!"
loop

Simpan dengan format *.vbs
Lalu Buka File Tersebut


10. Sama dengan trik nomor sembilan, tapi berbeda khascopy:
Copy script dibawah ini dan paste di notepad anda.

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 “!! “

Simpan dengan format *.vbs
Lalu Buka File Tersebut


Semoga berhasil Xixixixixi.....

SEMOGA BERMANFAAT... JANGAN LUPA TINGGALKAN KOMENTARMU!!

0 Response to "TRIK-TRIK DENGAN MENGGUNAKAN NOTEPAD UNTUK MENJAHILI TEMAN"

Poskan Komentar

Catatan:
1. Berkomentarlah dengan bahasa yg jelas dan mudah dimengerti.
2. Untuk menyisipkan gambar gunakan kode [img]Tulis URL gambar di sini[/img]
3. Untuk menyisipkan video gunakan kode [youtube]Tulis URL Video Youtube di sini[/youtube]
4. Untuk melihat kumpulan emoticon klik tombol emoticon dibawah ini.
Emoticon

Google+ Followers

Bagaimanakah web murah hati menurut anda?