Cd-Rom kapağınızın sürekli açılıp kapandığını görmek sizin icin herhalde cok sinir bozucu olabilirdi. Soz konusu kişi başkası ise bu eğlenceli olabilir. Bir kaç adımda kendi şaka scriptnizi yazip arkadaşlarınıza gönderebilirsiniz.

http://www.uzmanim.net/Sorular/Prog...si/Q_85.aspx



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.