silk78
Messages postés1Date d'inscriptionjeudi 5 février 2004StatutMembreDernière intervention 5 février 2004
-
5 févr. 2004 à 19:16
Tilois
Messages postés721Date d'inscriptiondimanche 10 juin 2001StatutMembreDernière intervention27 mars 2011
-
5 févr. 2004 à 19:38
bonjour a tous et a toutes kk1 conaitrait comment on peut ouvrir le lecteur (physique de la machine grace a un prog?
mci de rep
Silk
La violence est la philosophi des faibles d'esprit
Tilois
Messages postés721Date d'inscriptiondimanche 10 juin 2001StatutMembreDernière intervention27 mars 20117 5 févr. 2004 à 19:38
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
'Pour Fermer le lecteur
ret = mciSendString("Set cdaudio door closed wait", vbNullChar, 0, 0)
'Pour ouvrir le lecteur
ret = mciSendString("Set cdaudio door open wait", vbNullChar, 0, 0)