lon91ong 当前离线
三级士官
TOP
zqz0012005 (smile)当前离线
假装是个高手
荣誉版主
set wmi=GetObject("Winmgmts:") set drvc=wmi.ExecQuery("select * from win32_LogicalDisk") for each drv in drvc if drv.volumename = "光盘卷标" then CDdrive = drv.name exit for end if next复制代码