Add New Members to a Security Group

Share
https://www.wincert.net/forum/topic/267-add-new-members-to-a-security-group/
Followers

Start new topic
Reply to this topic

Posted October 12, 200618 yr

Const ADS_PROPERTY_APPEND = 3 

Set objGroup = GetObject _
  ("LDAP://cn=Sea-Users,cn=Users,dc=NA,dc=fabrikam,dc=com") 

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

objGroup.SetInfo