如何使用Dragon NaturalPeak的高级脚本弹出CD-ROM驱动器？

Question

是否有任何方法可以用龙自然播放的高级脚本弹出CD-ROM驱动器？

Answer 1

您可以使用Windows Multimedia API(也称为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

源(镜子(