matmat
-
30 mars 2001 à 14:07
jihednond
Messages postés143Date d'inscriptionjeudi 27 mars 2008StatutMembreDernière intervention 3 septembre 2011
-
13 juin 2008 à 11:59
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
jihednond
Messages postés143Date d'inscriptionjeudi 27 mars 2008StatutMembreDernière intervention 3 septembre 20111 13 juin 2008 à 11:59
merci ce code fonctionne 100% mes tu doit ajouter
Private Sub Command1_Click()
Call OuvrirCD
End Sub
Private Sub Command1_Click()
Call FermerCD
End Sub
pour que les débutant puisse l'appliquer
djgab21
Messages postés66Date d'inscriptionvendredi 15 juin 2007StatutMembreDernière intervention19 mai 2011 4 janv. 2008 à 13:36
Super la source NIX
réponse a Lunnatick : en vbs c'est
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
(désolé je suis un peu tard)
lunnatick
Messages postés175Date d'inscriptionlundi 9 mai 2005StatutMembreDernière intervention28 octobre 2013 10 août 2006 à 03:03
Bonjour, c'est su VBS ?
grosbidou21
Messages postés74Date d'inscriptionmardi 3 février 2004StatutMembreDernière intervention 5 février 20102 28 oct. 2004 à 17:56
le module mciSendString doit être déclaré en "public" et non en "private" si tu veux le placer dans un module.
Comme bcp de tes source, elle est simple, claire et très utile. Que demander de mieu?
SuperClic
Messages postés48Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 3 octobre 2002 20 août 2002 à 17:42
13 juin 2008 à 11:59
Private Sub Command1_Click()
Call OuvrirCD
End Sub
Private Sub Command1_Click()
Call FermerCD
End Sub
pour que les débutant puisse l'appliquer
4 janv. 2008 à 13:36
réponse a Lunnatick : en vbs c'est
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
(désolé je suis un peu tard)
10 août 2006 à 03:03
28 oct. 2004 à 17:56
Comme bcp de tes source, elle est simple, claire et très utile. Que demander de mieu?
20 août 2002 à 17:42
19 août 2002 à 10:17
20 juil. 2002 à 12:41
Pourquoi ? Le résultat est un long.
VB devra caster dans ton dos si ta variable est integer.
12 mars 2002 à 09:20
Sinon, C trop bien
20 sept. 2001 à 21:36
17 avril 2001 à 11:39
30 mars 2001 à 14:07
mais n'oubliez pas de déclarer la variable ret en Integer