Saya Punya Skrip VBS Untuk Membuka CD-ROM Komputer, Tapi...

[Badguy13]

Gan tadi saya buka-buka Youtube.com dan ketemu video membuat skrip VBS yang fungsinya untuk membuka CD-ROM secara berulang. Jadi kalau skripnya dijalankan maka CD-ROM komputer akan terbuka dan apabila ditutup akan terbuka kembali, begitu seterusnya sampai beberapa kali (Kalau tidak salah sampai 3 kali saja). Saya ingin minta tolong dari Agan semuanya untuk menjelaskan kepada saya skrip yang saya maksud diatas. Ini skripnya:



do

Set oWMP = CreateObject("WMPlayer.OCX.7")

Set colCDROMs = oWMP.cdromCollection



if colCDROMs.Count >= 1 then

For i = 0 to colCDROMs.Count - 1

colCDROMs.Item(i).Eject

Next ' cdrom

End if

loop



Lalu bagaimana cara mengubah skrip di atas agar CD-ROM terbuka berulang-ulang sampai tidak ada batasnya. Jadi kalau skrip diatas dijalankan maka CD-ROM akan terbuka dan bila ditutup, CD-ROM akan terbuka kembali, begitu seterusnya sampai tidak ada batasnya.



Satu lagi nih...

Bagaimana cara membuat autorunnya? Agar pada saat flasdisk dibuka di komputer maka skrip diatas akan langsung berjalan. Saya sudah coba membuatnya dengan skrip autorun.inf dan kedua file saya letakkan di direktori root dari flashdisk tapi pada saat icon flashdisk saya ENTER tidak bisa. Ini skripnya:



[Autorun]

shellexecute=wscript.exe OPEN.vbs

action=APLIKASI PEMBUKA CD-ROM



Catt: Nama file *.VBS-nya saya buat OPEN.



Jadi, buat Agan semuanya tolong dijawab ya...

Terima kasih sebelumnya...



http://www.tombolenter.com/