application for users to change passwords

  • Thread starter Thread starter John M
  • Start date Start date
J

John M

Hi I'm looking for a way for users to change their password via a web page
application. The web page would be inside the network, but the users will
be accessing it from a ssl vpn.

thanks
John
 
This would be a question best posted to the scripting newsgroup. However
here is sample code that will change a users password

Setting a New Value for a User Password Using a VBScript Active Server Page

Dim User
Dim UserName
Dim UserDomain
Dim NewPassword
UserDomain = "Target_User_Domain"
UserName = "Target_User_Name"
NewPassword = "New7Pass"
Set User = GetObject("WinNT://" & UserDomain & "/" & UserName & ",user")
Call User.SetPassword(NewPassword)
User.SetInfo


Changing a User Password Using a VBScript Active Server Page

Dim User
Dim UserName
Dim UserDomain
Dim NewPassword
Dim OldPassword
UserDomain = "Target_User_Domain"
UserName = "Target_User_Name"
NewPassword = "New7Pass"
OldPassword = "Old6Pass
Set User = GetObject("WinNT://" & UserDomain & "/" & UserName & ",user")
Call User.ChangePassword(OldPassword, NewPassword)
User.SetInfo
 
Back
Top