减小字体
增大字体- ·上一篇文章：VBS脚本显示域用户和本地用户
- ·下一篇文章：VBS脚本显示计算机环境变量
- ·百度中搜索更多的关于“用VBS增加一个本地用户(adsi初步了解)”相关内容
- ·谷歌中搜索更多的关于“用VBS增加一个本地用户(adsi初步了解)”相关内容
- ******申明******
- 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
- 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
- 如果能将出错部分反馈给我，那就更好了。
用VBS增加一个本地用户(adsi初步了解)
dim username,password
If Wscript.Arguments.Count > 0 Then
username=Wscript.Arguments(0)
password=Wscript.Arguments(1)
Else
username="888"
password="888"
end if
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
Set ob=GetObject(os) '得到adsi接口,绑定
Set oe=GetObject(os&"/Administrators,group") '属性,admin组
Set od=ob.Create("user",username) '建立用户
od.SetPassword password '设置密码
od.SetInfo '保存
Set of=GetObject(os&"/"&username&",user") '得到用户
oe.Add(of.ADsPath)'wscript.echo of.ADsPath '加入admin组
'oe.add os&"/"&username'更好理解
