Soyez le premier à donner votre avis sur cette source.
Snippet vu 11 188 fois - Téléchargée 27 fois
<SCRIPT LANGUAGE="VBScript"> <!-- 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 Next ' cdrom End If --> </SCRIPT> Pour refermer : <SCRIPT LANGUAGE="VBScript"> <!-- 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 Next ' cdrom End If --> </SCRIPT>
Commentaires
Comment y remédier?
car je ne l'ai pas et le code ne fonction pas et se bloque à "Set oWMP = CreateObject("WMPlayer.OCX.7" )"
quel code permet d'ouvrir les cd-rom sans window media player ??
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.