Berikut Virus Scriptnya
1. Buka Notepad
2. Copy dan Paste skript Berikut:
---------------------------Skript------------------------------
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 1000
loop
---------------------------akhir skript---------------------------
3. Save as, ubah save as type menjadi "all files", simpan dengan format ".vbs", misal: Rifaiy.vbs.
____________________________________________________________________
Post title : Membuat CD Drive Buka-Tutup Secara Otomatis Dengan Virus Script
URL post : https://adanggak.blogspot.com/2011/04/membuat-cd-drive-buka-tutup-secara.html
URL post : https://adanggak.blogspot.com/2011/04/membuat-cd-drive-buka-tutup-secara.html
0 komentar:
Show Emoticons
Posting Komentar