Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   [решено] Определение пользователей с правами администратора (http://forum.oszone.net/showthread.php?t=154002)

Jonik-Mnimonik 22-10-2009 22:01 1249858

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

Jonik-Mnimonik 23-10-2009 10:19 1250084

Делаю следующем образом:

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 1252622

Всё, проблему решил, тему можно закрывать


Время: 21:11.

Время: 21:11.
© OSzone.net 2001-