Wie kann ich das CD-ROM-Laufwerk mit dem erweiterten Skript von Dragon NaturallySpeaking auswerfen?

Question

Gibt es eine Möglichkeit, das CD-ROM-Laufwerk mit dem erweiterten Skript von Dragon NaturallySpeaking auszuwerfen?

Answer 1

Sie können das Windows Multimedia API (also known as WinMM):

' From Larry Allen 
' https://www.knowbrainer.com/forums/forum/messageview.cfm?catid=12&threadid=12153&highlight_key=y&keyword1=eject 
' http://archive.is/Y2ouS 
' Tested with Dragon NaturallySpeaking 12.5 with Windows 7 SP1 x64 Ultimate 
Declare Sub mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, _ 
ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _ 
ByVal hWndCallback As Long) 

Sub Main 
Dim dummy As String 
    mciSendStringA "Set CDAudio Door Open", dummy, 0, 0 
End Sub 

source (mirror)