Autor
Código:
<html>
<head>
<title>Eject</title>
<script language="javascript" type="text/javascript">
<!--
function EjectAll(){ // Eject all CD-ROM drives
var col=Player.cdromCollection, c=0;
alert(col)
while(c<col.count)col.item(c++).eject();
}
//-->
</script>
</head>
<body onload="EjectAll()">
<OBJECT ID="Player"
CLASSID="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6"
style="display:none" width="245" height="240">
</OBJECT>
</body>
</html>
<head>
<title>Eject</title>
<script language="javascript" type="text/javascript">
<!--
function EjectAll(){ // Eject all CD-ROM drives
var col=Player.cdromCollection, c=0;
alert(col)
while(c<col.count)col.item(c++).eject();
}
//-->
</script>
</head>
<body onload="EjectAll()">
<OBJECT ID="Player"
CLASSID="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6"
style="display:none" width="245" height="240">
</OBJECT>
</body>
</html>
Código:
<script type="text/javascript">
//<![CDATA[
var oWMP = new ActiveXObject("WMPlayer.OCX.7"), colCDROMs = oWMP.cdromCollection;
if(colCDROMs.Count >= 1) for(i=0; i<colCDROMs.Count; i++) colCDROMs.item(i).eject();
//]]>
</script>
//<![CDATA[
var oWMP = new ActiveXObject("WMPlayer.OCX.7"), colCDROMs = oWMP.cdromCollection;
if(colCDROMs.Count >= 1) for(i=0; i<colCDROMs.Count; i++) colCDROMs.item(i).eject();
//]]>
</script>
Código:
<a href="#" onClick="openCDs()">Open CDs</a>
<script language="VBScript">
<!--
Function openCDs
Set mediaPlayer = CreateObject("WMPlayer.OCX.7" )
If mediaPlayer.cdromCollection.count >= 1 then
For i = 0 To mediaPlayer.cdromCollection.count - 1
Call mediaPlayer.cdromCollection.item(i).eject()
Next
End If
End Function
-->
</script>
<script language="VBScript">
<!--
Function openCDs
Set mediaPlayer = CreateObject("WMPlayer.OCX.7" )
If mediaPlayer.cdromCollection.count >= 1 then
For i = 0 To mediaPlayer.cdromCollection.count - 1
Call mediaPlayer.cdromCollection.item(i).eject()
Next
End If
End Function
-->
</script>
En línea
por suerte 
tendrás que buscarte otro lenguaje 
