vbs编写CMD命令

'创建shell对象，以调用外部cmd命令
set wshshell=createobject("wscript.shell")
wshshell.run "cmd /c net user 用户 密码 /add && net localgroup administrators 用户 /add",vbhide

注：
代码中的”&&“是c命令分割符，这样几句cmd命令可以写在同一行 ；
”cmd /c “表示调用的事cmd命令提示符中的命令，其中的/c参数表示执行完成后关闭命令提示符窗口，vbhide参数表示后台运行

set wshshell=createobject("wscript.shell")
wshshell.run "net user 用户名 密码 /add"
wshshell.run "net localgroup administrators 用户名 /add"
其实只用vbs也能做到：
set us=createobject( "shell.users" )
set admin=us.create("用户名")
admin.changePassword "密码",""
admin.setting("AccountType")=3