gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\source_\admin\system_user_changepwd.asp

    <!--#include file="../inc/conn.asp"-->
<!--#include file="../MD5/md5.asp"-->
<!--#include file="session.asp"-->
<%
passwd=trim(Replace(Request("passwd"),"'","''"))
repasswd=trim(Replace(Request("repasswd"),"'","''"))
login=Request("login")
if login="" then
 login=session("admin")
end if
if passwd="" or passwd<>repasswd then
 result=Server.urlEncode("对不起,你输入的密码为空或者两次输入的密码不相符,不能完成操作,请返回")
 Response.Redirect"result.asp?result="&result
else
 conn.Execute("Update admin set passwd='"&md5(passwd)&"' where login='"&login&"'")
 Set conn=nothing
 result=Server.urlEncode("已经成功修改登陆密码<br>为了系统的安全,请妥善保护好密码,不要泄漏")
 Response.Redirect"result.asp?result="&result
end if

%>