Soyez le premier à donner votre avis sur cette source.
Vue 2 870 fois - Téléchargée 254 fois
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() Call mciSendString("Set CDAudio Door Open", "", 0, 0) 'Ouvrir CDRom End Sub Private Sub Command2_Click() Call mciSendString("Set CDAudio Door Closed", "", 0, 0) 'Fermer CDRom End Sub
11 mars 2006 à 14:39
Ton code est nikel.
Merci
28 juil. 2005 à 15:03
14 nov. 2002 à 16:43
14 nov. 2002 à 16:41
14 nov. 2002 à 04:07
et pis coment ta fait pour ke les autres sources du genre marchent pas ?
CÉ LE MEME CODE
1/10
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.