Looking for help with WMI query for an application (TSM).
On Error Resume Next
strComputer = "Server1
Server2
Server3"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next
Can anyone help?
Thanks,
Mike
--------------------------------------------------------------------
mail2web LIVE – Free email based on Microsoft® Exchange technology -
http://link.mail2web.com/LIVE
~ Upgrade to Next Generation Antispam/Antivirus with Ninja! ~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm> ~
