Re: WMI missing security settings

Hi Jeffrey,

This simple vbs script shows four settings.

Thanks.



'http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=2642372&SiteID=1

strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\"
& strComputer & "\root\RSOP\computer")
Set colItems = objWMIService.ExecQuery("Select * from
RSOP_SecuritySettingBoolean")
for Each objItem in colItems
Wscript.Echo objItem.KeyName & " = " & objItem.Setting
Next



.

Relevant Pages

  • Re: How to get System Resources info?
    ... Set colItems = objWMIService.ExecQuery ... For Each objItem in colItems ... > its realted device caption, ...
    (microsoft.public.windowsxp.wmi)
  • Re: use different Roaming Profiles depending on OS
    ... Set colItems = objWMIService.ExecQuery("Select * from ... For Each objItem in colItems ... I have only the opportunity to leave the profil ptah blank or set an profile path. ...
    (microsoft.public.windows.server.active_directory)
  • Re: temperature disque dur
    ... have you a peace of code for mesure temperature of a disque please ... Set colItems = objWMIService.ExecQuery("Select * from ... For Each objItem in colItems ...
    (microsoft.public.scripting.wsh)
  • Re: Where is ootcimv2SecurityMicrosoftVolumeEncryption?
    ... Set colItems = objWMIService.ExecQuery("SELECT * FROM ... For Each objItem in colItems ... If objItem.DriveLetter = strSDL then ...
    (microsoft.public.scripting.vbscript)
  • Help with WMI script reading from TXT file
    ... of servers.txt is not online then strcomputer stays as the sever on line 7 ... For Each objItem in colItems ... Set colItems = objWMIService.ExecQuery("Select * from ...
    (microsoft.public.scripting.vbscript)