1
Crear variables que contienen la contraseña anterior y la nueva . Para cambiar la contraseña de dominio de un usuario, también se requiere que el valor anterior . El código siguiente configura variables con nuevos y viejos valores: Dim newpassoldpass oldpassDim = newpass " myOldPass " = " newpass "
2
Recuperar información del usuario desde el servidor de dominio . El código siguiente recupera la información del usuario desde el servidor y lo asigna a una variable: Set user = GetObject ( "LDAP ://cn = myUser , ou = myDomain , dc = cp , dc = com" )
Página 3
Cambiar la contraseña del usuario . La siguiente instrucción cambia la contraseña del usuario de la vieja a una nueva contraseña: user.ChangePassword myOldPass , newpass
4
Guarde el archivo y colocarlo en el directorio home del usuario en el servidor de dominio. Modifica la próxima vez que el usuario inicia sesión, la contraseña de dominio .