vbs下用一个小方法实现批量添加域用户
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
复制代码 代码如下: setadsou=getobject("ldap://cn=users,dc=hzcncter,dc=local") constforreading=1 setobjfso=createobject("scripting.filesystemobject") setobjtextfile=objfso.opentextfile_ ("users.txt",forreading) dountilobjtextfile.atendofstream strnextline=objtextfile.readline arruserlist=split(strnextline,",") struser=arruserlist(0) strpass=arruserlist(1) setadsuser=adsou.create("user","cn="&struser) adsuser.put"samaccountname",struser adsuser.put"userprincipalname",struser&"@hzcncter.local" adsuser.setinfo adsuser.setpasswordstrpass adsuser.accountdisabled=false adsuser.setinfo loop 注意保存后，更改一下dc名称（红色字体），如果ou名称是英文，也可以连ou名称一起更改，这样就可以直接将用户建立到ou里面。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于vbs下用一个小方法实现批量添加域用户的所有评论
