CD-Drive Auto open and close
Posted by SantY in Windows XP on Monday, June 29, 2009
CD open and close.
copy the below code into notepad and save it as anyname.vbs like arbit.vbs
and then double click on it...what u see....bingo.
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
Now if u want to disable this go to task manager click on process
then find wscript.exe and end this process.
This entry was posted on Monday, June 29, 2009 at 4:07 PM and is filed under Windows XP. You can follow any responses to this entry through the RSS 2.0. You can leave a response.
- No comments yet.