域内如何修改域用户密码[已解决]

pandy05 · 发表于 2012-6-20 13:59:07

本帖最后由 pandy05 于 2012-7-6 15:56 编辑

我是域管理员，域内有一个公用账户，为控制该用户的滥用，所以需要每天在我的工作机器上（非域服务器）执行一次脚本，以修改该账户密码为一个6位随机数字，“net user” 命令貌似做不到，请教高手AU3是否可以实现？谢谢！

fpquenya · 发表于 2012-6-20 15:06:49

本帖最后由 fpquenya 于 2012-6-20 16:08 编辑

回复 1# pandy05


;-------------------------------------
;修改域用户的密码,在加域的计算机下用"具备对该用户修改密码的权限账户"下执行(不一定是域管理员)
;-------------------------------------

;方法1,需要安装了服务器管理工具包,使用dsquery和dsmod命令
Local $sUserName = "zhangsan"
Local $sPassword = "2ud0923"
Run("dsquery user -samid " & $sUserName & "|dsmod user -pwd " & $sPassword)

;方法2
Local $sDCName = "PDC" ;域控服务器名
Local $sUserName = "zhangsan"
Local $sPassword = "ABCD1234"
Local $oUser = ObjGet("WinNT://" & $sDCName & "/" & $sUserName & ",User")
$oUser.SetPassword($sPassword)

;方法3
Local $sCN = "张三"
Local $sPassword = "9988aabb"
Local $oUser = ObjGet("LDAP://CN=" & $sCN & ",OU=信息中心,DC=contoso,DC=com") ;用户的distinguishedName
$oUser.SetPassword($sPassword)

pandy05 · 发表于 2012-6-22 09:58:58

回复 2# fpquenya

太好用了，多谢多谢！

arken · 发表于 2012-6-23 12:42:57

好源码，谢谢楼主

heruowen · 发表于 2012-10-21 14:50:01

我也正需要这样的功能。大家都说好源码，但我还是试不成功。我是在一台加了域的客户端计算机上运行的。用系统自带的改密码方法需要旧密码，这里好像不需要旧密码就能够更改吗？还是大家的运行环境与我不同？请用过成功的指导，谢谢。

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

[系统综合] 域内如何修改域用户密码[已解决]

相关帖子

评分