vbs中怎么实现批量添加域用户-创新互联-成都快上网建站

vbs中怎么实现批量添加域用户-创新互联

这篇文章主要为大家展示了“vbs中怎么实现批量添加域用户”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“vbs中怎么实现批量添加域用户”这篇文章吧。

10年积累的成都网站设计、成都网站建设经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先做网站后付款的网站建设流程,更有通许免费网站建设让你可以放心的选择与我们合作。

代码如下:


set adsou=getobject("ldap://cn=users,dc=hzcncter,dc=local") 
const forreading = 1 
set objfso = createobject("scripting.filesystemobject") 
set objtextfile = objfso.opentextfile _ 
("users.txt", forreading) 
do until objtextfile.atendofstream 
strnextline = objtextfile.readline 
arruserlist = split(strnextline , ",") 
struser=arruserlist(0) 
strpass=arruserlist(1) 
set adsuser=adsou.create("user","cn=" & struser) 
adsuser.put "samaccountname", struser 
adsuser.put "userprincipalname", struser & "@hzcncter.local" 
adsuser.setinfo 
adsuser.setpassword strpass 
adsuser.accountdisabled=false 
adsuser.setinfo 
loop

注意保存后,更改一下dc名称(红色字体),如果ou名称是英文,也可以连ou名称一起更改,这样就可以直接将用户建立到ou里面。


以上是“vbs中怎么实现批量添加域用户”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


新闻标题:vbs中怎么实现批量添加域用户-创新互联
网页URL:http://kswjz.com/article/dgcode.html
扫二维码与项目经理沟通

我们在微信上24小时期待你的声音

解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流