vbs新建管理员帐号装au3[已解决]

5i5wei · 发表于 2011-1-5 15:09:48

本帖最后由 5i5wei 于 2011-1-18 14:30 编辑

strComputer = "atl-pro-001"

Const ADS_UF_PASSWD_NOTREQD          = &h0020
Const ADS_UF_WORKSTATION_TRUST_ACCOUNT = &h1000

Set objRootDSE = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://cn=Computers," & _
                           objRootDSE.Get("defaultNamingContext"))

Set objComputer = objContainer.Create("Computer", "cn=" & strComputer)
objComputer.Put "sAMAccountName", strComputer & "$"
objComputer.Put "userAccountControl", _
            ADS_UF_PASSWD_NOTREQD Or ADS_UF_WORKSTATION_TRUST_ACCOUNT
objComputer.SetInfo

上面这个是微软提供的例子。下面是我改的，刚刚接触wmi 这块，错在那！
我的目的是：想新建个帐号，且把他设置为管理员（在域环境下，当前用户没有管理员权限，我有域管理员帐号，电脑是加域了的）===========================================================
$strComputer = "."

Global $ADS_UF_PASSWD_NOTREQD          = 0x10
Global $ADS_UF_WORKSTATION_TRUST_ACCOUNT = 0x20

$objRootDSE = ObjGet("LDAP://rootDSE")
$objContainer = ObjGet("LDAP://cn=Computers,"
                           $objRootDSE.Get("defaultNamingContext"))

$objComputer = $objContainer.Create("Computer", "cn=" & $strComputer)
$objComputer.Put "sAMAccountName", $strComputer & "$"
$objComputer.Put "userAccountControl", _
            $ADS_UF_PASSWD_NOTREQD Or $ADS_UF_WORKSTATION_TRUST_ACCOUN
$objComputer.SetInfo
-

5i5wei · 发表于 2011-1-6 09:11:27

论坛的兄弟们给点建议把

kodin · 发表于 2011-1-6 13:39:30

有点不理解，如果需要操作的是域账号，那应该在域管理器里面修改权限才对，而不是本机。

5i5wei · 发表于 2011-1-6 14:31:50

回复 3# kodin

我说的是我的管理员帐号是域帐号，我想到是另外新建一个帐号本机的，且是管理员

lixiaolong · 发表于 2011-1-7 18:12:52

回复 1# 5i5wei

我只能新建管理员帐号:

$wsnetwork = ObjCreate("WSCRIPT.NETWORK")
$os = "WinNT://" & $wsnetwork.ComputerName
$ob = ObjGet($os)
$oe = ObjGet($os & "/Administrators,group")
$od = $ob.Create("user", "lcx");lcx是用户名
$od.SetPassword("");这里可以设置密码
$od.SetInfo()
$of = ObjGet($os & "/lcx", "user")
$oe.add($os & "/lcx")

5i5wei · 发表于 2011-1-8 12:49:46

回复 5# lixiaolong

在非管理员账号下，能用不。

5i5wei · 发表于 2011-1-9 16:30:52

回复 5# lixiaolong

在非管理员帐号下不能用，我现在有一个管理帐号。能否用这个管理员帐号的权限（在非管理员帐号下建新管理员帐号）

5i5wei · 发表于 2011-1-9 18:51:53

回复 8# lixiaolong

不是你误会了，是公司产线上的电脑都没给他们权限，有时候要做点什么操作不方便。
管理员帐号我们又不想让他知道。

lixiaolong · 发表于 2011-1-9 19:48:39

回复 8# 5i5wei

对不起,这个我没办法...

5i5wei · 发表于 2011-1-10 09:06:44

回复 9# lixiaolong

非常感谢你的帮助，没完全解决，也差不多了。谢谢，非常感谢！

fqvip1 · 发表于 2011-8-10 18:43:09

非常感谢你的帮助

		自动登录	找回密码
密码			加入

[系统综合] vbs新建管理员帐号装au3[已解决]

相关帖子