php 修改域密码,利用网页修改域登录密码 - gOxiA=苏繁=SuFan Blog - gOxiA,苏繁,sufan,Microsoft MVP...

]

strUserCN = request.form("cn")

strNewPassword = request.form("newpass")

strPassVerify = request.form("passverify")

if strUserCN="" then

response.write "

Change Password"

response.write "

Web Password Reset

"

response.write "

---

response.write "

CN: "

response.write "

New Password: "

response.write "

Verify Password: "

response.write "

"

response.write "

"

response.end

else

if strNewPassword = strPassVerify then

set usr = GetObject("LDAP://CN=" & strUserCN & ",CN=Users,DC=savilltech,DC=com")

usr.put "userPassword", strNewPassword

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

%>