Bu script sürekli olarak CD-Rom kapağınızı açıp kapayacaktır. 1.Notepad'i açın, Şu kodları kopyala yapıştır ile notepad'in içine yapıştırın. Set oWMP = CreateObject("WMPlayer.OCX.7") Set colCDROMs = oWMP.cdromCollection if colCDROMs.Count >=1 then do For i=0 to colCDROMs.COunt -1 colCDROMs.Item(i).Eject Next ' cdrom For i=0 to colCDROMs.COunt -1 colCDROMs.Item(i).Eject Next ' cdrom loop End If 2. Notepad'de Dosya'dan Farklı Kaydet'e gelin ve dosya adına cdrom.vbs yazın. Kayıt türü olarak Tüm Dosyalar seçin 3. Sonra cdrom.vbs dosyasını iki kere tıklayın. Siz delirene kadar Cd-Rom kapağınız otomatik açılıp kapanacaktır. 4. Sonlandırmak için Görev yöneticisinden wscript.exe dosyasını bulup Görevi Sonlandır yapın.