这篇文章主要为大家展示了“vbs中怎么实现批量添加域用户”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“vbs中怎么实现批量添加域用户”这篇文章吧。代码如下:set adsou=geto
这篇文章主要为大家展示了“vbs中怎么实现批量添加域用户”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“vbs中怎么实现批量添加域用户”这篇文章吧。
代码如下:
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中怎么实现批量添加域用户”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注编程网精选频道!
--结束END--
本文标题: vbs中怎么实现批量添加域用户
本文链接: https://www.lsjlt.com/news/253919.html(转载时请注明来源链接)
有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341
下载Word文档到电脑,方便收藏和打印~
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
2024-05-08
回答
回答
回答
回答
回答
回答
回答
回答
回答
回答
0