vbs 批量添加域用户 vbs下用一个小方法实现批量添加域用户

软件发布|下载排行|最新软件

当前位置:首页IT学院IT技术

vbs 批量添加域用户 vbs下用一个小方法实现批量添加域用户

  2021-03-17 我要评论
想了解vbs下用一个小方法实现批量添加域用户的相关内容吗,在本文为您仔细讲解vbs 批量添加域用户的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点: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里面。

Copyright 2022 版权所有 软件发布 访问手机版

声明:所有软件和文章来自软件开发商或者作者 如有异议 请与本站联系 联系我们