Welcome to HBH! If you had an account on hellboundhacker.org you will need to reset your password using the Lost Password system before you will be able to login.

irritating cd drive - Other Code Bank


irritating cd drive
pops out the cd drive continously.......copy it in notepad and save as anything.VBS
                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


copy it in notepad and save as anything.VBS
            
Comments
yureon's avatar
yureon 13 years ago

Is this the exact code, or do I have to add/delete some text?