在Active Directory中的方便应用

来源:百度知道 编辑:UC知道 时间:2024/06/15 05:34:52
我现在的意思是:如果有300个用户,一个人去添加用户的话很慢,我现在想,如果能几个人一起添加用户,这样快上很多.请问能用什么方案来实现这个.??
Set objRootDSE = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://cn=Users," & _
objRootDSE.Get("defaultNamingContext"))
For i = 1 To 1000
Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
objLeaf.Put "sAMAccountName", "UserNo" & i
objLeaf.SetInfo
Next
WScript.Echo "1000 Users created."

请问这个代码中如果我想按照我的名字来改的话,应该怎么做..
For i = 1 To 1000
Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
objLeaf.Put "sAMAccountName", "UserNo" & i
objLeaf.SetInfo
这段代码的意思是什么?

批量添加用户,推荐使用较本来做,比较安全,而且可以实现统一。

参考:http://www.microsoft.com/china/technet/community/scriptcenter/user/scrug55.mspx