How to explore wmi objects?

[Sunsawe]

Hi,

A lot of people is using the wmi service. Usually it looks like that:

Func _ServGetDetails($iName, $Computer = ".")
    Local $Rtn = ''
    $Service = ObjGet("winmgmts:\\" & $Computer & "\root\cimv2")
    $sItems = $Service.ExecQuery("Select * from Win32_Service")
    For $objService in $sItems
        If $objService.Name == $iName Then
        $Rtn &= $objService.SystemName & '|' & $objService.Name & '|' & $objService.ServiceType & '|' & $objService.State & '|'
        $Rtn &= $objService.ExitCode & '|' & $objService.ProcessID & '|' & $objService.AcceptPause & '|' & $objService.AcceptStop & '|'
        $Rtn &= $objService.Caption & '|' & $objService.Description & '|' & $objService.DesktopInteract & '|' & $objService.DisplayName & '|'
        $Rtn &= $objService.ErrorControl & '|' & $objService.PathName & '|' &$objService.Started & '|' & $objService.StartMode & '|'
        $Rtn &= $objService.StartName
        Return StringSplit($Rtn, '|')
        EndIf
    Next
    Return SetError(-1)
EndFunc

I would like to know if there is a way to "explore" the $objService without knowing its attributs. Something like:

foreach $attribut in $objService
  $attribut.getName()
  $attribut.getValue()

Thanks

[James]

Have you tried Default?

[ptrex]

@All

There is way if you use a COM Object Browser that accesses the Type Lib.

If I have the time I will create one.

regards

ptrex

[James]

ptrex, that would be far over useful, it would be another fantastic script which will help so many people.

[Bucione]

If I understood your question correctly, this should do the trick...

Func _EnumWMIclassInstances($classname, $servername = ".")
    Local $service = ObjGet("winmgmts:\\" & $servername & "\root\cimv2")
    Local $security = $service.Security_
    $security.ImpersonationLevel = 3
    Local $collection = $service.InstancesOf($classname)
    For $object In $collection
        For $property in $object.Properties_
            ConsoleWrite($property.Name & ": " & $property.Value & @CR)
        Next
    Next
EndFunc

_EnumWMIclassInstances("Win32_Service")

Edited October 23, 2007 by ArthurB

[GaryFrost]

why don't you all look at scriptomatic for AutoIt and see how it's done.....

Look in Downloads

[DirtDBaK]

i say scriptomatic is the tool you're probabbly looking for.

btw there are auotit tags that actually highlight you're script...

Edited October 23, 2007 by DBak