CD schublade öffnen code

[F@T!H_]

Ich programmiere gerade ein verarsche programm mir fehlt NUR eins ...

wie kann ich die CD schublade mit einem Code öffnen ???

ich programmiere die programme mit Visual Basic 2008

LG

[Aimless Angel]

hm ich move mal in coders! aber ich bezweifle das der thread lange offen bleibt!

[Elektrochemie]

'benötigte API-Deklaration
Private Declare Function mciExecute Lib "winmm.dll" ( _
  ByVal lpstrCommand As String) As Long

' CDROM-Laufwerk öffnen
Public Sub CDOpen()
  mciExecute "Set CDaudio door open"
End Sub

' CDROM-Laufwerk schliessen
Public Sub CDClose()
  mciExecute "Set CDaudio door closed"
End Sub