[VB6] Aprire lettore CD

[dirtyblackhole]

ciao a tutti!
non so se sia la sessione giusta cmq..
come da titolo volevo sapere se esiste un comando dos che mi permetta di far aprire il lettore del pc.( oppure farlo con VB).

Grazie a tutti!
ciao

[alka]

Per quanto riguarda l'uso di VB, il posto giusto è l'area dedicata al linguaggio in cui ho spostato la discussione.

Non so se esistono comandi DOS; se nessuno li suggerisce, eventualmente cerca in Software.

Ciao!

[Boolean]

in VB6 è possibile.

in un form metti 2 pulsanti, e copia queste righe nel codice del Form:

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()
'Apre il CD
Dim retvalue As Long
retvalue = mciSendString("set CDAudio door open", _
returnstring, 127, 0)
End Sub

Private Sub Command2_Click()
'Chiude il CD
Dim retvalue As Long
retvalue = mciSendString("set CDAudio door closed", _
returnstring, 127, 0)
End Sub

Boolean