<% 'This script lets you reset a user's password through a _ 'Web-based form by entering the user's CN and the new _ 'password to save. 'BEGIN CALLOUT A strUserCN = request.form("cn") strNewPassword = request.form("newpass") strPassVerify = request.form("passverify") 'END CALLOUT A if strUserCN="" then response.write "Change Password" response.write "

Web Password Reset

" response.write "


" response.write "" response.write "" response.write "" response.write "" response.write "
CN:
New Password:
Verify Password:
" response.end else if strNewPassword = strPassVerify then set obj = GetObject("LDAP://CN=" & strUserCN & ",CN=Users,DC=accenture,DC=com") response.write err.description 'BEGIN CALLOUT B obj.SetPassword strNewPassword response.write err.description 'END CALLOUT B response.write "Results

Update Results




" response.write strUserCN & ": password was successfully updated" response.end else response.write "Error!" response.write "

An Error Has Occurred!

" response.write "


" response.write "The password and confirmation do not match. Please go back and try again." response.end end if end if %>