列举WMI的所有属性方法

从网上摘录的，可以方便查找WMI 所有属性和方法：

cscript wmi.vbs >wmi.txt 2>&1 就可以了

strComputer = "."
Set objWMIService=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
For Each objclass in objWMIService.SubclassesOf()
	intCounter=0
	If Left(objClass.Path_.Class,5) = "Win32" Then
		For Each Qualifier in objClass.Qualifiers_
			If UCase(Trim(Qualifier.Name)) = "ASSOCIATION" Then
				intCounter = 1
			End If
		Next
		If x = 0 Then			
			Set strClass = objWMIService.Get(objClass.Path_.Class)
			Wscript.Echo "PROPERTIES:"
			For each strItem in strClass.properties_
				Wscript.Echo objClass.Path_.Class & vbTab & strItem.name 
			Next
			Wscript.Echo "METHODS:"
			For Each strItem in strClass.methods_
				Wscript.Echo objClass.Path_.Class & vbTab & strItem.name 
			Next
		End If
	end if
Next

转载于:https://my.oschina.net/33876402/blog/914922