Question

我已经修改了（以循环许多用户）来自this MS website的脚本以将用户添加到AD中的一个组，但是在此页面上并没有告诉我如何做某事。

Const ADS_PROPERTY_APPEND = 3
Set objGroup = GetObject _
 ("LDAP://cn=Atl-Users,ou=HR,dc=NA,dc=fabrikam,dc=com")

objGroup.PutEx ADS_PROPERTY_APPEND, _
 "member", Array("cn=YoungRob,ou=R&D,dc=NA,dc=fabrikam,dc=com")

objGroup.SetInfo

我可以在哪里添加以及用于检查他们是否已拥有此论坛的代码以及他们是否跳过这些代码并只是说wscript.echo "yeah they got this already" + UserName之类的内容。

Answer 1

这样的事情应该有效：

Const ADS_PROPERTY_APPEND = 3

dn = "cn=YoungRob,ou=R&D,dc=NA,dc=fabrikam,dc=com"

isMember = False

'check regular group memberships
For Each m In objGroup.GetEx("member")
  If LCase(m) = LCase(dn) Then
    isMember = True
    Exit For
  End If
Next

'check primary group
primaryGroupID = GetObject(dn).Get("primaryGroupID")
objGroup.GetInfoEx Array("primaryGroupToken"), 0
If primaryGroupID = objGroup.Get("primaryGroupToken") Then isMember = True

If Not isMember Then objGroup.PutEx ADS_PROPERTY_APPEND, "member", Array(dn)

修改Active Directory中的用户

1 个答案: