用Csvde 批量新增用户
DN, objectClass, sAMAccountName, userPrincipalName, displayName, userAccountControl
"CN=jack,OU=gz,DC=yankee,DC=com",user,jack,jack@yankee.com,514
"CN=tom,OU=gz,DC=yankee,DC=com",user,tom,tom@yankee.com,514
"CN=jane,OU=gz,DC=yankee,DC=com",user,jane,jane@yankee.com,514
"CN=john,OU=gz,DC=yankee,DC=com",user,john,john@yankee.com,514
保存为c:/user.txt
然后执行 csvde -I -f
c:/user.txt
缺点: 要手工输入用户信息, 不能输入密码,不能自动生成邮箱.
用ldifde批量新增用户
dn: CN=tom,OU=gz,DC=win,DC=com
changetype: add
cn: tom
objectClass: user
samAccountName: tom
givenName: tom
sn: tom
dn: CN=jack,OU=gz,DC=win,DC=com
changetype: add
cn: jack
objectClass: user
samAccountName: jack
givenName: jack
sn: jack
保存为c:/user.ldf 然后执行
ldifde -I -f c:/user.ldf
此方法实质与csvde 命令是相同的。
用Script批量新增用户
先生成一个txt文件,格式如下:
abc,test,test[abc]
bbb,jack,jack[bbb]
ccc,tom,tom[ccc]
'文件格式
'帐号,显示名称
'如:test,测试
' zhenghai,曾海
保存为C:/usr.txt
然后写入以下代码:
'Set objOU = GetObject("LDAP://CN=Users,dc=etunion,dc=com")
Set objOU = GetObject("LDAP://OU=gz,DC=win,DC=com")
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("user.txt", ForReading)
'文件格式
'帐号,显示名称
'如:test,测试
' zhenghai,曾海
Do Until objTextFile.AtEndOfStream
strNextLine = objTextFile.Readline
arrList = Split(strNextLine, ",")
Set objUser = objOU.Create("User", "cn=" & arrList(1))
objUser.Put "sAMAccountName", arrList(0)
'objUser.Put "givenName", arrList(1)
'objUser.Put "initials", "E."
objUser.Put "sn", arrList(1)
objUser.Put "DISPLAYName", arrList(2)
'objUser.Put "description", "gz"
objUser.SetInfo
Set objUser = GetObject("LDAP://cn=" & arrList(1) & ",OU=gz,DC=win,DC=com")
objUser.SetPassWord "pass&word123"
Loop
以上代码的功能:在win.com中的组织单位GZ中新增test, jack , tom 三个用户,初始密码为pass@word123
以上资料来源于
http://www.microsoft.com