You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
445 B
13 lines
445 B
'***************************************************************************
|
|
'This script tests the enumeration of subclasses
|
|
'***************************************************************************
|
|
On Error Resume Next
|
|
|
|
for each DiskSubclass in GetObject("winmgmts:").SubclassesOf ("CIM_LogicalDisk")
|
|
WScript.Echo "Subclass name:", DiskSubclass.Path_.Class
|
|
next
|
|
|
|
if Err <> 0 Then
|
|
WScript.Echo Err.Description
|
|
Err.Clear
|
|
End if
|