Получить SAMAccountNames для всех пользователей в группе AD - PullRequest
Новая
       16

Получить SAMAccountNames для всех пользователей в группе AD

0 голосов
/ 21 июня 2011

Я ищу vbscript, который будет извлекать SAMAccountNames для всех членов группы Active Directory.

Спасибо.

1 Ответ

1 голос
/ 22 июня 2011

Вот скрипт, который вы ищете: 

'  Begining from a given group
Dim strGrp
strGrp = "cn=g1,ou=ou,dc=societe,dc=fr"
Set objGroup = GetObject ("LDAP://"& strGrp)
objGroup.getInfo

arrMemberOf = objGroup.GetEx("member")

' Loop = For Each .... Next 
' WScript.Echo "Members of Group "
For Each strMember in arrMemberOf
   WScript.echo strMember
   Set objUser = GetObject ("LDAP://"& strMember)
   sAMAccountName = objUser.GetEx("sAMAccountName")
   WScript.echo sAMAccountName(0)
Next
Wscript.Quit

Вот сайт, где вы можете получить помощь.

...