changemyinfo.asp

本实例为一个完整的网上购物商城的完整例子程序,里面有所以的源代码.希望对大家学习有用.

<!--#include file="top.asp" -->
<!--#include file="md5.asp" -->
<%
'56770网络商城商业版
'版本：V2.0
'版权所有: 56770网络(56770.com)
%>
<%
if request("action")="xg" then
        user_postalcode=request("user_postalcode")
user_tel=request("user_tel")
user_mail=request("user_mail")
oicq=request("oicq")
fax=request("fax")
city=request("city")
user_adds=replace(request("user_adds"), ">", "&gt;")
user_adds=replace(user_adds, "<", "&lt;")
user_adds=replace(user_adds, "'","’")
conn.execute "update 56770_user set fax='"&fax&"',oicq='"&oicq&"', city='"&city&"', user_postalcode='"&user_postalcode&"', user_tel='"&user_tel&"', user_mail='"&user_mail&"', user_adds='"&user_adds&"' where user_id='"&session("user_id")&"'"
response.redirect "myuser.asp?action=modi&xgcg=ok"
response.end
end if
%>
<%
if request("action")="xgpass" then
        if request("ps")="" or Len(request("ps"))>16 or len(request("ps"))<6 then
        response.write"<SCRIPT language=JavaScript>alert('对不起，请输入您的密码(长度不能大于16小于6)');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
if request("ps1")="" or Len(request("ps1"))>16 or len(request("ps1"))<6 then
        response.write"<SCRIPT language=JavaScript>alert('对不起，请输入确认密码(长度不能大于16小于6)');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
if request("ps")<>request("ps1")then
        response.write"<SCRIPT language=JavaScript>alert('对不起，密码不同于确认密码，请仔细核对');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
user_password=md5(request("ps"))
conn.execute "update 56770_user set user_password='"&user_password&"' where user_id='"&session("user_id")&"'"
response.redirect "myuser.asp?action=modi&xgcg=ok"
response.end
end if
%>