从特定群组中的所有用户获取用户名

问题描述：

我必须在这里丢失某些东西，否则我会失明或者咖啡过多。基本上，我试图获得每个用户在特定组我AD的用户名。然后，我想取这些用户名并将其传递给powershell脚本。但那是另一种情况。这对你们来说可能是一个快速的胜利。从特定群组中的所有用户获取用户名

Dim groupName 
groupName = "LDAP://CN=groupname,OU=MailGroups,OU=Exchange,OU=MainContainer,DC=MyDomain,DC=com" 
Set objGroup = GetObject(groupName) 

For Each strUser in objGroup.Member 
    Set objUser = GetObject("LDAP://" & strUser.UserName) 
Next

我收到此错误信息Object required: 'strUser' 这究竟是为什么？ strUser就在那里！如果我改变片段有点这样的：

Set objGroup = GetObject(groupName) 

For Each strUser in objGroup.Member 
    Set objUser = GetObject("LDAP://" & strUser) 
    msgbox objUser.Name 
Next

然后我得到了每个成员的消息框结果CN=Doe John。

答

尝试

For Each strUser in objGroup.Members

不是会员，但会员* 小号 *

嗯，我仍然收到一个错误消息：错误的参数数量或无效的属性分配。这是第14行，字符5.意思是“Set objUser = GetObject（”LDAP：//“＆strUser） – 2010-11-04 14:34:31

答

这个网站会告诉你，比你以往任何时候都希望了解AD和VBS：

http://www.computerperformance.co.uk/vbscript/vbscript_group_enumerate_members.htm

从特定群组中的所有用户获取用户名

相关推荐