JeanMarcus
Messages postés147Date d'inscriptionsamedi 28 mai 2005StatutMembreDernière intervention10 mars 2014
-
7 juin 2005 à 18:20
cs_MasterHack
Messages postés586Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention13 février 2008
-
8 juin 2005 à 15:09
Bonjour !!!!!!
Qui pourrait me donner un code sympa pour ouvrir ( ou fermer ) le lecteur CD ou lecteur E .. a partir d ' un bouton Command11
cs_MasterHack
Messages postés586Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention13 février 20082 7 juin 2005 à 18:54
Salut
voici ce que tu dois faire :
-declare l'api mscisendstring
ds un evenement :
-pour ouvrir
msisendstring "set cdaudio door open",0,0,0
-pour fermer
msisendstring "set cdaudio door closed",0,0,0
et c tout
<HR>
Life is short...Learn more
Copy Rights <> Rights to Copy
cs_MasterHack
Messages postés586Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention13 février 20082 7 juin 2005 à 19:19
ok voici tout le code ;)
mets ce code ds un form avec deux commandbutton (command1 et command2)
et colle ce code
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
private sub command1_click()
mciSendString "set cdaudio door open",0,0,0
end sub
private sub command2_click()
mciSendString "set cdaudio door closed",0,0,0
end sub
<HR>
Life is short...Learn more
Copy Rights <> Rights to Copy