| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
Usver
Зарегистрирован: 17.06.2004
Сообщения: 81
Откуда: Tula
|
 Добавлено: Вт Авг 17 2004 12:00 Заголовок сообщения: WSH и группы? |
 |
|
Доброго времени суток.
Было бы замечательно, если бы кто-нибудь растолковал следующий момент:
- Можно ли каким нибудь образом узнать принадлежность пользователя к той или иной группе
- получить хотя бы список существующих групп
- как вообще наладить контакт ActiveDirectory и скрипта(если можно)
С использованием WSH
Заранее спасибо. |
|
| Вернуться к началу |
|
 |
Macr0s
Зарегистрирован: 17.08.2004
Сообщения: 5
Откуда: Энгельс
|
| Добавлено: Вт Авг 17 2004 13:19 Заголовок сообщения: |
|
|
Наладить контакт конечно можно...
получить список групп можно как-то так:
| Код: |
Set oUser=GetObject("WinNT:\\"&DomainName&"\"&UserName&",user")
For Each oGr In oUser.GetGroups
Groups=Groups&oGr&Chr(10)&Chr(13)
Next
MsgBox Groups
|
код левый, но принцип тот же, пусть отцы меня поправят.
а список групп можно получить через WMI
| Код: |
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Group",,48)
For Each objItem in colItems
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "Description: " & objItem.Description
WScript.Echo "Domain: " & objItem.Domain
WScript.Echo "InstallDate: " & objItem.InstallDate
WScript.Echo "Name: " & objItem.Name
WScript.Echo "SID: " & objItem.SID
WScript.Echo "SIDType: " & objItem.SIDType
WScript.Echo "Status: " & objItem.Status
Next
|
кстати, пример взял из PrimalScript WMI Wizard.
ИМХО PrimalScript - весчь... |
|
| Вернуться к началу |
|
|
|
FAQ 
Поиск 
Пользователи 
Группы
Регистрация
Профиль 
Войти и проверить личные сообщения 
Вход 
