I've done something similar but ran into problems when I forced a password change at the next login. Some AD rules only allow one password change per day !

I'll look at some code tomorrow for you.

D

On 16/01/13 17:02, David O'Brien wrote:

I am attempting to put together an easy way for users to change domain password when they are out of the office, (or if they have a MAC).

IADSUser.Setpassword(NewPassword) works, but doesn't do any checks.

IADSUser.ChangePassword(OldPassword, NewPassword) checks that the old password is correct but always fails the new password with "The password does not meet the password policy requirements..." Doesn't matter how complex I make the password.

Note: I can change the password normally on the domain without a problem, so I know the passwords I am trying to change to are complex enough.

Anyone played with this before?

I am using:

Var

User: IADsUser:

ADsOpenObject( 'WinNT://' + edtUser.Text, '[Administrator]', '[admin password]', 1, IADsUser, User) ;

User.ChangePassword(edtPass.Text, 'c0mpl!anse');

Regards,

Dave.



_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: [email protected]
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to [email protected] with 
Subject: unsubscribe

_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: [email protected]
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to [email protected] with 
Subject: unsubscribe

Reply via email to