Change other users passwords in Active Directory from remote nt4,2000,XP workstations

From: Johnny (Johnny_at_nospamthanks.com)
Date: 08/22/04


Date: Sun, 22 Aug 2004 17:37:33 +0100

Hi,

Currently I'm helping to config a network changing from Win 2K server to
Win 2k3 server.

The network has workstations with NT4, 2000 Pro and XP Pro installed.

What is the best way to allow a user that has been delegated "password
change" rights of an OU to change users passwords in that Active Directory
OU while on a remote workstation?

Is there anyway to change the passwords/access active directory without
installing any extra
programs like ADSI, just pure vbscript or something else?

It would also be useful if the script also set the bit in active directory
that forced users to change their password at
next logon, after the management users had set the password.

I've tried this vbscript and other variations of it, but it doesn't seem to
work or connect to

DIM strPWD, strLDAP, strUSER

strLDAP = "ou=people,dc=test,dc=here,dc=com"
strUSER = inputbox("Enter the username:")
strPWD = inputbox("Enter the new password:")

Set objUser = GetObject("LDAP://cn=" & strUSER,strLDAP )
objUser.SetPassword strPWD
WScript.ECHO "Password Changed"

Can anyone help?

Any help would be greatly appreciated



Relevant Pages


Loading