为了内网安全，我们需要定期修改域管理员密码、用户本地管理员密码、用户密码等。域管理员密码修改比较方便，用户密码，在密码到期后，用户会自行修改。只是用户本地管理员密码，如果手动修改，工作量会很大。
通过下面脚本就可以方便的实现。注意要选择相应的OU噢！！
将本地administrator密码重置为nihao123!
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator,user")
objUser.SetPassword "nihao123!"
objUser.SetInfo