Ehm Ehm Minal Aidin Wal Faidzin ya, Maaf dari kemaren ga posting posting karena sibuk Ngurusin Lebaran,, 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:
2. Tombol Enter Terus-terusan AktifSet 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
Code:
3. Backspace (Jika menekan tombol Bacspace akan keluar tulisan “Maaf anda harus mengulang kembali” atau bisa dibuat semau kita.)Set wshShell = wscript.CreateObject(“WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “~(enter)” loop
Code:
4. Iseng Dengan Membuka Calculator Terus MenerusMsgBox “Maaf, Anda Harus Mengulang Kembali” Set wshShell =wscript.CreateObject(“WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “{bs}” loop
Code:
5. Iseng Dengan Shutdown Komputer@ECHO off :top START %SystemRoot%\system32\cacl.exe GOTO top
Code:
Semoga Bermanfaat buat Balas Dendam.. hehe@echo off msg * Komputer Anda Terinfeksi Virus shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0
Tidak ada komentar:
Posting Komentar