Cambiar las contraseñas de los usuarios del dominio en lotes

Su script es para cambiar la contraseña de administrador de esta máquina

Mire a continuación: cn el nombre de usuario del dominio está ubicado en ou, dc=nombre de dominio dc-com

Establecer objUser = GetObject _

("LDAP://cn=MyerKen,ou=management,dc=fabrikam,dc=com")

objUser.SetPassword "i5A2sj* !"