change a user's password for a specified network server or domain ?

Author: Simon Grossenbacher

Homepage: http://www.swissdelphicenter.ch

0 Comments to this tip [Write new comment]

[ Print tip ]

Tip Rating (9):

Skill:

Useful:

Overall:

function NetUserChangePassword(Domain: PWideChar; UserName: PWideChar; OldPassword: PWideChar;

NewPassword: PWideChar): Longint; stdcall; external 'netapi32.dll'

Name 'NetUserChangePassword';

// Changes a user's password for a specified network server or domain.

// Requirements: Windows NT/2000/XP

// Windows 95/98/Me: You can use the PwdChangePassword function to change a user's

// Windows logon password on these platforms

procedure TForm1.Button1Click(Sender: TObject);

begin

NetUserChangePassword(PWideChar(WideString('\\COMPUTER')),

PWideChar(WideString('username')),

PWideChar(WideString('oldpass')),

PWideChar(WideString('newpass')));

end;