Selasa, 29 Juni 2010

Isengin pc teman pake script notepad jahil..!

1. Meng-eject Drive CD-Room Terus-Menerus
Code:

Code:

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


2. Tombol Enter Terus-terusan Aktif
Code:

Code:

Set wshShell = wscript.CreateObject(“WScript.Shell”)

do

wscript.sleep 100

wshshell.sendkeys “~(enter)”

loop


3. Iseng Dengan Pesan Lambat Notepad “Hello, how are you? I am good thanks!
Code:

Code:

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 “Hel”

WScript.Sleep 500

WshShell.SendKeys “lo ”

WScript.Sleep 500

WshShell.SendKeys “, ho”

WScript.Sleep 500

WshShell.SendKeys “w a”

WScript.Sleep 500

WshShell.SendKeys “re ”

WScript.Sleep 500

WshShell.SendKeys “you”

WScript.Sleep 500

WshShell.SendKeys “? ”

WScript.Sleep 500

WshShell.SendKeys “I a”

WScript.Sleep 500

WshShell.SendKeys “m g”

WScript.Sleep 500

WshShell.SendKeys “ood”

WScript.Sleep 500

WshShell.SendKeys ” th”

WScript.Sleep 500

WshShell.SendKeys “ank”

WScript.Sleep 500

WshShell.SendKeys “s! “


4. Iseng Dengan Backspace (Jika menekan tombol Bacspace akan keluar tulisan "Maaf anda harus mengulang kembali" atau bisa dibuat semau kita.)

Code:

Code:

MsgBox “Maaf, Anda Harus Mengulang Kembali”

Set wshShell =wscript.CreateObject(“WScript.Shell”)

do

wscript.sleep 100

wshshell.sendkeys “{bs}”

loop


5. Iseng Dengan Membuka Calculator Terus Menerus
Code:

Code:

@ECHO off

:top

START %SystemRoot%\system32\cacl.exe

GOTO top


6. Iseng dengan Keyboard (tampil tulisan yang kita inginkan)
Code:

Code:

Set wshShell = wscript.CreateObject(“WScript.Shell”)

do

wscript.sleep 100

wshshell.sendkeys “Maaf, Keyboard Tidak Berfungsi! Harap Diperbaiki”

loop


7. Iseng Dengan Shutdown Komputer
Code:

Code:

@echo off

msg * Komputer Anda Terinfeksi Virus

shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0

Semua trik di atas (No. 1 sampai 7 di simpan / save menggunakan .VBS (misalnya pake nama yang bikin penasaran, misalnya: Cewe_Cantik.VBS) dan save as type-nya pake all files, setelah itu berikan ke temen yang mau kita isengin....! Nah nti temen pasti penasaran dan buka notepad itu, Jreng.....jreng... komputer langsung mengikuti perintah sesuai judul di atas!

Nb :

1. hati2 gan, klo keseringan bisa wafat tu kompie ..

2. saia tidak mengajarkan anda untuk jahil, tp saia hanya share apa yang saia ketahui