modify_save.asp

asp+access开发的网上购物程序

<%@ codepage ="936" %>
<%
if id=session("id") then
session("pageid")="modify"
response.redirect "../login/login.asp"
else
id=session("id")
%>
<!--#include file="../../conn/dbconn2.asp"-->
<!--#include file="../../inc/config.asp"-->
<script LANGUAGE="JavaScript">
function goHist(a) 
{
history.go(a); 
}
</script>
<%
dim rsgs
dim gssql
dim user
dim pass
dim question
dim answer
dim sf
dim city
dim post
dim address
dim phone
dim mobile
dim fax
dim email
dim web
dim name
dim ch
dim bm
dim zw 
dim gsid
dim sortid
dim typeid
dim errmsg
user=request.form("user")
pass=request.form("pass")
question=request.form("question")
answer=request.form("answer")
sf=request.form("sf")
mobile=request.form("mobile")
city=request.form("city")
post=request.form("post")
address=request.form("address")
phone=request.form("phone")
email=request.form("email")
name=request.form("name")
ch=request.form("ch")
bm=request.form("bm")
zw=request.form("zw")
if trim(request.form("sf"))="北京" then
cityid="1"
end if
if trim(request.form("sf"))="上海" then
cityid="2"
end if
if trim(request.form("sf"))="天津" then
cityid="3"
end if
if trim(request.form("sf"))="重庆" then
cityid="4"
end if
if trim(request.form("sf"))="黑龙江" then
cityid="5"
end if
if trim(request.form("sf"))="吉林" then
cityid="6"
end if
if trim(request.form("sf"))="辽宁" then
cityid="7"
end if
if trim(request.form("sf"))="内蒙古" then
cityid="8"
end if
if trim(request.form("sf"))="河北" then
cityid="9"
end if
if trim(request.form("sf"))="新疆" then
cityid="10"
end if
if trim(request.form("sf"))="甘肃" then
cityid="11"
end if
if trim(request.form("sf"))="宁夏" then
cityid="12"
end if
if trim(request.form("sf"))="山西" then
cityid="13"
end if
if trim(request.form("sf"))="山东" then
cityid="14"
end if
if trim(request.form("sf"))="青海" then
cityid="15"
end if
if trim(request.form("sf"))="西藏" then
cityid="16"
end if
if trim(request.form("sf"))="四川" then
cityid="17"
end if
if trim(request.form("sf"))="陕西" then
cityid="18"
end if
if trim(request.form("sf"))="河南" then
cityid="19"
end if
if trim(request.form("sf"))="湖北" then
cityid="20"
end if
if trim(request.form("sf"))="安徽" then
cityid="21"
end if
if trim(request.form("sf"))="江苏" then
cityid="22"
end if
if trim(request.form("sf"))="浙江" then
cityid="23"
end if
if trim(request.form("sf"))="江西" then
cityid="24"
end if
if trim(request.form("sf"))="湖南" then
cityid="25"
end if
if trim(request.form("sf"))="贵州" then
cityid="26"
end if
if trim(request.form("sf"))="云南" then
cityid="27"
end if
if trim(request.form("sf"))="广西" then
cityid="28"
end if
if trim(request.form("sf"))="广东" then
cityid="29"
end if
if trim(request.form("sf"))="福建" then
cityid="30"
end if
if trim(request.form("sf"))="海南" then
cityid="31"
end if
if trim(request.form("sf"))="香港" then
cityid="32"
end if
if trim(request.form("sf"))="澳门" then
cityid="33"
end if
if trim(request.form("sf"))="台湾" then
cityid="34"
end if
if trim(request.form("sf"))="郑州市" then
cityid="35"
end if
if trim(request.form("sf"))="安阳市" then
cityid="36"
end if
if trim(request.form("sf"))="濮阳市" then
cityid="37"
end if
if trim(request.form("sf"))="鹤壁市" then
cityid="38"
end if
if trim(request.form("sf"))="新乡市" then
cityid="39"
end if
if trim(request.form("sf"))="焦作市" then
cityid="40"
end if
if trim(request.form("sf"))="三门峡" then
cityid="41"
end if
if trim(request.form("sf"))="洛阳市" then
cityid="42"
end if
if trim(request.form("sf"))="南阳市" then
cityid="43"
end if
if trim(request.form("sf"))="平顶山" then
cityid="44"
end if
if trim(request.form("sf"))="漯河市" then
cityid="45"
end if
if trim(request.form("sf"))="许昌市" then
cityid="46"
end if
if trim(request.form("sf"))="开封市" then
cityid="47"
end if
if trim(request.form("sf"))="商丘市" then
cityid="48"
end if
if trim(request.form("sf"))="驻马店" then
cityid="49"
end if
if trim(request.form("sf"))="周口市" then
cityid="50"
end if
if trim(request.form("sf"))="信阳市" then
cityid="51"
end if
if trim(request.form("sf"))="济源市" then
cityid="52"
end if
if trim(request.form("sf"))="其它" then
cityid="53"
end if
if trim(request.form("mobile"))="" then
mobile="空"
else
mobile=request.form("mobile")
end if
if trim(request.form("zw"))="" then
zw="空"
else
zw=request.form("zw")
end if
if trim(request.form("fax"))="" then
fax="空"
else
fax=request.form("fax")
end if
if trim(request.form("web"))="" then
web="空"
else
web=request.form("web")
end if
id=session("id")
%>
<%
set rs=server.CreateObject ("adodb.recordset")
sql="select * from qyml where id="&id
rs.open sql,conn,1,3
rs("user")=user
rs("pass")=pass
rs("question")=question
rs("answer")=answer
rs("sf")=sf
rs("city")=city
rs("post")=post
rs("address")=address
rs("mobile")=mobile
rs("phone")=phone
rs("fax")=fax
rs("email")=email
rs("web")=web
rs("name")=name
rs("ch")=ch
rs("bm")=bm
rs("zw")=zw
rs("gsid")=user
rs("cityid")=cityid
rs.update
session("id")=rs("id")
session("user")=rs("user")
session("pass")=rs("pass")
session("question")=rs("question")
session("answer")=rs("answer")
session("Sf")=rs("Sf")
session("City")=rs("City")
session("Post")=rs("Post")
session("Address")=rs("Address")
session("mobile")=rs("mobile")
session("Phone")=rs("Phone")
session("Fax")=rs("Fax")
session("Email")=rs("Email")
session("Web")=rs("Web")
session("name")=rs("name")
session("ch")=rs("ch")
session("bm")=rs("bm")
session("zw")=rs("zw")
rs.close
set rs=noting
conn.close
set conn=nothing 
%>
<LINK href="../../css/Style.css" rel=stylesheet type=text/css>
<HTML><HEAD><TITLE><%=WebName%>-会员管理平台</TITLE>
<a name="a"></a>
<META content=zh-cn http-equiv=Content-Language>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="Microsoft FrontPage 5.0" name=GENERATOR></HEAD>
<BODY leftMargin=0 oncontextmenu="return false" onselectstart="return false" 
topMargin=0 marginheight="0" marginwidth="0" bgcolor="#000080" style="background-color: #FDFDFD">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="95%" id="AutoNumber1">
<tr>
<td width="719" height="77" valign="top" bgcolor="#FFFFFF">
<center>
<FORM method="POST" action="../../Login/modify_save.asp" name="Form1" onsubmit="return FormCheck();" >
<INPUT type=hidden 
value=name=which> 
<TABLE align=center border=0 cellPadding=1 cellSpacing=0 width="515" height="547">
<TBODY>
<TR vAlign=top>
<TD width="513" height="545" bgcolor="#FFFFFF">
<div align="center">
<center>
<TABLE border=0 
width="538" height="105" bordercolor="#111111" style="border-collapse: collapse" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF" cellpadding="2">
<TBODY>
<tr><TD align=left height="1" width="290" bgcolor="#FFFFFF">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="76%" id="AutoNumber4" height="24">
<tr>
<td width="100%" height="24" style="color: #000; font-family: 宋体; font-size: 12px" background="../IMAGES/newmiddle-bg7.gif">
<FONT color=#000000>
<IMG 
src="../../Login/images/bul_arrowGrnSm.gif"></FONT><font class=f12 style="font-size: 10.5pt"><b> 
修改基本资料</b></font></td>
</tr>
</table>
</TD>
</CENTER> 
<TD align=left height="1" width="237" bgcolor="#FFFFFF">
</TD>
</TR> 
<CENTER>
<TBODY>
<INPUT name=provincetwo 
type=hidden> 
</TD> 
</tr> 
<tr> 
</CENTER> 
<CENTER> 
</tr> 
</CENTER> 
<tr>
<TD align=right height="47" width="530" colspan="2">
<table border="2" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber10" bordercolorlight="#CEDBFF" bordercolordark="#CEDBFF">
<tr>
<TD style="color: #000; font-family: 宋体; font-size: 12px" bgcolor="#F4FAFF">
<div align="center">
<center>
<table border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber3" height="166">
<tr>
<td width="100%" height="162" valign="top" bgcolor="#F4FAFF">
　<div align="center">
<center>
<table border="0" cellspacing="3" width="98%" cellpadding="4" height="78" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td height="51" bgcolor="#FFFFFF"><P style="line-height: 180%"><b>
<span style="font-size: 10.5pt">&nbsp;&nbsp; 尊敬的会员朋友:</span></b></P>
<p style="line-height: 180%"> &nbsp;&nbsp; 欢迎来<%=webname%>网站，您已经修改了您个人用户的资料，<br>&nbsp;&nbsp; 您的用户名是<b><%=session("user")%></b>，请记住您的密码：<b><%=session("pass")%></b><br>
&nbsp;&nbsp;
请您记住您的用户名和密码，<a target="_top" href="../../default.asp"><font style='color: #f60'>返回主页！</font></a></p></td>
</tr>
<tr>
<td height="45" bgcolor="#FFFFFF"><p align="center">
<font style='color: #f60; font-size:11.5pt'><b>用我们不断的努力 创造您无限的商机!!</b></font></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</center>
</div>
</TD>
</tr>
</table>
</TD></tr> 
<tr> 
<CENTER>
</tr>
<tr>
</CENTER>
<CENTER>
</tr>
<tr> 
</CENTER> 
<CENTER> 
</tr> 
</TBODY></TABLE>
</center>
</div>
</CENTER>
</TD></TR></TBODY></TABLE>
</FORM>
</td>
</tr>
<tr>
<td width="100%">　</td>
</tr>
</table>
</center>
</div>
<%end if%>
</BODY></HTML>