如何确定CD-ROM驱动器的盘符?
Const DriveTypeCDROM = 4 Set oFS = Wscript.CreateObject("Scripting.FileSystemObject") Set oDrives = oFS.Drives '循环 A-Z.如发现则退出! For Each Drive in oDrives If Drive.DriveType = DriveTypeCDROM Then Wscript.Echo Drive.DriveLetter End If Next 
|