Войти

Показать полную графическую версию : [решено] Определение пользователей с правами администратора


Jonik-Mnimonik
22-10-2009, 22:01
Здравствуйте, задача состоит в следующем: необходимо определить какие пользователи добавлены в группу "Администраторы" в сети на компьютерх с ОС Windows XP. Т.е необходимо написать скрипт который подключался бы к компьютеру, счтитывал пользователей в групее "Администраторы" и выводил бы их на экран. Или может можно сделать другими методами? Вопрос в следующем: как именно считать эту группу?
p.s. Права доменного администратора, имеются, так что проблемы запуска скрипта на удалённой машине не возникнет. и если можно, то какой нибуть примерчик.

Jonik-Mnimonik
23-10-2009, 10:19
Делаю следующем образом:

Dim strComputer
strComputer="."
Set objArgs = WScript.Arguments
Set objUnnamedArgs=objArgs.Unnamed
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("Select * from Win32_Group Where LocalAccount = True")
For Each objItem in colItems
if objitem.Sid="S-1-5-32-544" then
Wscript.echo objItem.Name
Wscript.echo objitem.Sid
end if
Next

При этом выводиться название группы. Но вот как прочитать кто находится в этой группе я не знаю.

Jonik-Mnimonik
26-10-2009, 11:11
Всё, проблему решил, тему можно закрывать




© OSzone.net 2001-2012