www.gusucode.com > 528人才招聘网整站源代码-蓝色经典 精简版 2.0源码程序 > admin/updata_user_ac.asp

    <!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
if session("login")<>"yes" then
response.write "<script language=JavaScript>" & chr(13) & "alert('您还未登陆或者超时,请重登陆！');"&"window.location.href = '../'"&" </script>"
response.end
end if
if request("ttype")="1" then
if trim(request("pwd"))="" and trim(request("answer"))="" then sql="update in_user set question='"&request("question")&"',lock="&request("lock")&" ,vip="&request("vip")&",rz="&request("rz")&" where id="&request("id")
if trim(request("pwd"))="" and trim(request("answer"))<>"" then sql="update in_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",answer='"&md5(trim(request("answer")))&",rz="&request("rz")&"' where id="&request("id")
if trim(request("pwd"))<>"" and trim(request("answer"))="" then sql="update in_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",pwd='"&md5(trim(request("pwd")))&",rz="&request("rz")&"' where id="&request("id")
if trim(request("pwd"))<>"" and trim(request("answer"))<>"" then sql="update in_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",pwd='"&md5(trim(request("pwd")))&"',answer='"&md5(trim(request("answer")))&",rz="&request("rz")&"' where id="&request("id")
end if
if request("ttype")="2" then
if trim(request("pwd"))="" and trim(request("answer"))="" then sql="update en_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",rz="&request("rz")&" where id="&request("id")
if trim(request("pwd"))="" and trim(request("answer"))<>"" then sql="update en_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",answer='"&md5(trim(request("answer")))&",rz="&request("rz")&"' where id="&request("id")
if trim(request("pwd"))<>"" and trim(request("answer"))="" then sql="update en_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",pwd='"&md5(trim(request("pwd")))&",rz="&request("rz")&"' where id="&request("id")
if trim(request("pwd"))<>"" and trim(request("answer"))<>"" then sql="update en_user set question='"&request("question")&"',lock="&request("lock")&",vip="&request("vip")&",pwd='"&md5(trim(request("pwd")))&"',answer='"&md5(trim(request("answer")))&",rz="&request("rz")&"' where id="&request("id")
end if
rs.open sql,conn,1,1
response.write "<script language=JavaScript>" & chr(13) & "alert('修改成功，即将返回！');" & "history.back()" & "</script>" 
set rs=nothing
%>