SCRIPT TO POP UP CD DRIVE

 Do you still remember that some Disc has this?

If you try to copy a video or music by open it directly the this will happen?

Your CD/DVD POP UP ENDLESSLY?

Well, here how you can create it too using notepad..

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 100

 loop

 

Save it as CD.bat

 

 

Warning: Don't open it on your own PC

 

(Educational Purpose Only)