Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Add All Users in an ADAM OU to a Group Content of Add All Users in an ADAM OU to a Group.vbs MD5 Hash: C5EF4B723E1DD6888CD9D10DF0D44A15
	' Description: Adds all the users in the Accounting OU to an ADAM group named Accountants. On Error Resume Next Set objOU = GetObject("LDAP://localhost:389/ou=Accounting,dc=fabrikam,dc=com") Set objGroup = GetObject _ ("LDAP://localhost:389/cn=Accountants,ou=Accounting,dc=fabrikam,dc=com") objOU.Filter = Array("user") For Each objUser in objOU objGroup.Add objUser.AdsPath Next

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::