Kali ini saya akan memberikan skrip program usil. Saya mendapatkan skrip ini dari BinusHacker. Lumayan buat ngejailin teman. hihihi
Saya sudah pernah mencoba semua skrip ini dan efeknya tidak sampai membuat crash komputer. Jika Anda ingin menghentikan proses skrip ini bisa melalui task manager (Ctrl + Shift + Esc).
Langsung aja copas skrip di bawah ini
Langsung aja copas skrip di bawah ini
1. Usil dengan tombol Enter terus menerus
Set wshShell=wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
2. Usil dengan Eject Optical Drive terus menerus
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
3. Usil dengan Calculator
@ECHO off
:top
START %SystemRoot%\system32\calc.exe
GOTO top
Ket:
Ganti tulisan yang berwarna kuning dengan nama yang Anda inginkan.
sudah dulu ya...
selamat beriseng ria
Cetak Halaman ini
0 komentar:
Bagaimana Pendapat Anda?
Silahkan memberikan komentar...
Kemajuan blog ini juga bergantung pada komentar yang Anda berikan, tapi jangan asal memberikan komentar.
Silahkan baca Tata Cara Berkomentar yang Baik
Bagi yang ingin bertukar link silahkan komentar di halaman tukar link