How To Open Up Your CD Drive With A .VBScript Code

Code: Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count = 1 then
for i = 0 to colCDROMS.Count - 1
colCDROMs.Item(i).Eject
colCDROMs.Item(i).Eject
Next ' cdrom
End if

Category:

Howto & Style

Tags:

• Set
• oWMP
• colCDROMs
• oWMP.cdromCollection
• if
• colCDROMs.Count
• then
• for
• to
• colCDROMS.Count
• colCDROMs.Item(i).Eject
• Next
• cdrom
• End
• VBScript
• Code

[JPPetro]

I was never 5, LOL. I'm 9.

[ShazaLondon]

why was you doing this at 9 lol

[OfficialGeekshelpu]

I just press ALT-F9 and it opens but thats just on my keyboard nice vid

[itsmeohmeandme]

OMg, how old are you?

[bedsidetable2]

xD gfhghf

[BMXilla]

whoa five years old?