在windows上通过命令弹出光盘

将下面一段脚本复制到文本文件里，文件后缀改成vbs，双击执行。

在 Windows 10 家庭中文版 上亲测可行。

rem Msgbox("begin")
Set objWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = objWMP.cdromCollection
If colCDROMs.count >= 1 Then
    For I = 0 To colCDROMs.count-1
		colCDROMs.Item(I).Eject
	Next
End If

第一行是调试语句，可以忽略。

第二行创建媒体播放器对象。

第三行取得所有光驱。

下面循环弹出所有光驱。

参考资料：

Windows上用命令弹出光驱. – 悠悠猴