drive letter lekérdezése

Microsoft Windows

Hogyan lehet windows alatt lekérdezni az optikai meghajtó betűjelét? Praktikusan vbscriptben.
A C: fixen a hdd, D: az optikai, de tegyük fel ez utóbbi nem biztos. (H:-tól pedig hálózati meghajtók vannak.)

  • 1118 megtekintés

( pike.killer v | 2010. 07. 28., sze – 13:50 )

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_CDROMDrive")
For Each objItem in colItems
For Each strCapability in objItem.Capabilities
Next
Wscript.Echo "Drive: " & objItem.Drive
Next