VB LECTEUR... OUVERTURE ET FERMETURE DU LECTEUR DE CDROM
cs_PROGRAMMIX
Messages postés
1133
Date d'inscription
mercredi 2 octobre 2002
Statut
Membre
Dernière intervention
24 juillet 2011
-
5 nov. 2003 à 12:08
erty_kl01 Messages postés 2 Date d'inscription lundi 15 mai 2006 Statut Membre Dernière intervention 24 juin 2006 - 24 juin 2006 à 14:19
erty_kl01 Messages postés 2 Date d'inscription lundi 15 mai 2006 Statut Membre Dernière intervention 24 juin 2006 - 24 juin 2006 à 14:19
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/17693-vb-lecteur-ouverture-et-fermeture-du-lecteur-de-cdrom
https://codes-sources.commentcamarche.net/source/17693-vb-lecteur-ouverture-et-fermeture-du-lecteur-de-cdrom
24 juin 2006 à 14:19
24 juin 2006 à 14:18
30 avril 2005 à 23:46
RetVal = mciSendString("set CDAudio door " & strChoixAction, RString, 128, 0) '
comme ca ,ca marche mieux!
30 avril 2005 à 23:44
:utilisation de constante et création de la fonction GestionCdrom (cela permet d'ecrire moins de code)
Public Const strActionFermetureCdrom As String = "closed"
Public Const strActionOuvertureCdrom As String = "Open"
Public Sub GestionCdrom(strChoixAction As String)
Dim RetVal As Long
Dim RString As String
RString = Space$(128)
RetVal = mciSendString("set CDAudio door" & strChoixAction, RString, 128, 0) ' Pour
End Sub
@
30 avril 2005 à 23:32
5 nov. 2003 à 12:08
C'est vache à dire, mais je propose la suppression de cette source qui n'apporte rien de neuf...