📄 moduser.asp
字号:
<!--#include file="top.asp"-->
<!--#include file="../inc/fyaspcode.asp"--><%
if UCase(changechr(Request.QueryString("action"))) = "SAVE" then
Dim rdsInfo
set rdsInfo = Server.CreateObject("ADODB.Recordset")
rdsInfo.Open "fyuser Where id= "&Session("userid"),Conn,3,3
rdsInfo("company") =changechr(Request.Form("company"))
rdsInfo("question") =changechr(Request.Form("question"))
rdsInfo("answer") = changechr(Request.Form("answer"))
rdsInfo("name") =changechr(Request.Form("name"))
rdsInfo("qq") = changechr(Request.Form("qq"))
rdsInfo("ch") = changechr(Request.Form("ch"))
rdsInfo("phone") = changechr(Request.Form("phone"))
rdsInfo("post") = changechr(Request.Form("post"))
rdsInfo("provinceCN") = changechr(Request.Form("TPL_prov"))
rdsInfo("capitalCN") = changechr(Request.Form("TPL_city"))
rdsInfo("mobile") = changechr(Request.Form("mobile"))
rdsInfo("fax") = changechr(Request.Form("fax"))
rdsInfo("email") = changechr(Request.Form("email"))
rdsInfo("web") = changechr(Request.Form("web"))
rdsInfo("address") = changechr(Request.Form("address"))
rdsInfo("message") = changechr(Request.Form("message"))
rdsInfo.Update
rdsInfo.Close
set rdsInfo = nothing
Response.write("<script>alert(""修改成功！"");location.href=""moduser.asp"";</script>")
Response.end
end if
%><!--#include file="jm.asp"--><HTML><HEAD><TITLE>会员管理中心</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK
href="../imge/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD><script language="javascript">
function CheckInput()
{
if (document.form1.name.value == "")
{
alert("请输入您的姓名！");
document.form1.name.focus();
return false;
}
if (document.form1.phone.value == "")
{
alert("请输入您的联系电话！");
document.form1.phone.focus();
return false;
}
if (document.form1.email.value != "")
{
var filter=/^\s*([A-Za-z0-9_-]+(\.\w+)*@(\w+\.)+\w{2,3})\s*$/;
if (!filter.test(document.form1.email.value)) {
alert("邮件地址不正确,请重新填写！");
document.form1.email.focus();
document.form1.email.select();
return false;
}
}
if (document.form1.message.value != "" && document.form1.message.value.length > 200)
{
alert("您输入的简介过多，请简单输入！");
document.form1.message.focus();
return false;
}
document.form1.submit()
}
// -->
</SCRIPT>
<BODY leftMargin=0 topMargin=0 marginwidth="0" marginheight="0">
<TABLE cellSpacing=1 cellPadding=1 width=750 align=center bgColor=#e8e8e8
border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=745 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD class=menbertable vAlign=top width=160>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><!--#include file="left.asp"--></TD></TR></TBODY></TABLE></TD>
<TD vAlign=top><%
set rsu = Server.CreateObject("ADODB.Recordset")
sqlu= "Select * From fyuser Where id = "&Session("userid")
rsu.Open sqlu,Conn,1,1
if not rsu.EOF then
name=rsu("name")
address=rsu("address")
web=rsu("web")
email=rsu("email")
fax=rsu("fax")
mobile=rsu("mobile")
provinceCN=rsu("provinceCN")
post=rsu("post")
phone=rsu("phone")
ch=rsu("ch")
company=rsu("company")
question=rsu("question")
answer=rsu("answer")
message=rsu("message")
qq=rsu("qq")
end if
rsu.Close
set rsu= nothing
conn.close
set conn=nothing%>
<FORM name=form1 action=moduser.asp?action=save method=post>
<TABLE cellSpacing=2 cellPadding=2 width="100%" border=0>
<TBODY>
<TR>
<TD colspan="2"><TABLE height=56 cellSpacing=0 cellPadding=0
width="100%" background=../imge/zfbj.gif
border=0><TBODY>
<TR>
<TD width="2%"> </TD>
<TD
width="64%"> 首页
资料修改 </TD>
<TD
width="34%"> </TD></TR></TBODY></TABLE></TD>
</TR>
<TR>
<TD><FONT color=#000000>会员登录名：</FONT></TD>
<TD><%=session("boobuser")%></map%%></TD></TR>
<TR>
<TD><FONT color=#000000>您的姓名：</FONT></TD>
<TD><INPUT class=smallInput maxLength=100 size=30
value="<%=name%>" name=name> <FONT color=#990000>*</FONT>
<select size="1" name="ch">
<option value="先生" <%if ch="先生" then%> selected <%end if%>>先生</option>
<option <%if ch="女士" then%> selected <%end if%> value="女士">女士</option>
</select></TD></TR>
<TR>
<TD><FONT color=#000000>电话：</FONT></TD>
<TD><INPUT class=smallInput maxLength=20 size=30
value="<%=phone%>" name=phone> <FONT
color=#990000>*</FONT>
邮 编： <INPUT class=smallInput value="<%=post%>" maxLength=6 size=8 name=post></TD></TR>
<TR>
<TD>
省/市：</TD>
<TD>
<select name=TPL_prov class="wenbenkuang" onChange="setcity();">
<option value="浙江" <%if provinceCN="浙江" then%> selected <%end if%>> Zhejiang 浙江</option>
<option value="安徽" <%if provinceCN="安徽" then%> selected <%end if%>> Anhui 安徽</option>
<option value="北京" <%if provinceCN="北京" then%> selected <%end if%>> Beijing 北京</option>
<option value="重庆" <%if provinceCN="重庆" then%> selected <%end if%>> Chongqing 重庆</option>
<option value="福建" <%if provinceCN="福建" then%> selected <%end if%>> Fujian 福建</option>
<option value="甘肃" <%if provinceCN="甘肃" then%> selected <%end if%>> Gansu 甘肃</option>
<option value="广东" <%if provinceCN="广东" then%> selected <%end if%>> Guangdong 广东</option>
<option value="广西" <%if provinceCN="广西" then%> selected <%end if%>> Guangxi 广西</option>
<option value="贵州" <%if provinceCN="贵州" then%> selected <%end if%>> Guizhou 贵州</option>
<option value="海南" <%if provinceCN="海南" then%> selected <%end if%>> Hainan 海南</option>
<option value="河北" <%if provinceCN="河北" then%> selected <%end if%>> Hebei 河北</option>
<option value="黑龙江" <%if provinceCN="黑龙江" then%> selected <%end if%>>Heilongjiang 黑龙江</option>
<option value="河南" <%if provinceCN="河南" then%> selected <%end if%>> Henan 河南</option>
<option value="9港" <%if provinceCN="9港" then%> selected <%end if%>> Hongkong 9港</option>
<option value="湖北" <%if provinceCN="湖北" then%> selected <%end if%>> Hubei 湖北</option>
<option value="湖南" <%if provinceCN="湖南" then%> selected <%end if%>> Hunan 湖南</option>
<option value="江苏" <%if provinceCN="江苏" then%> selected <%end if%>> Jiangsu 江苏</option>
<option value="江西" <%if provinceCN="江西" then%> selected <%end if%>> Jiangxi 江西</option>
<option value="吉林" <%if provinceCN="吉林" then%> selected <%end if%>> Jilin 吉林</option>
<option value="辽宁" <%if provinceCN="辽宁" then%> selected <%end if%>> Liaoning 辽宁</option>
<option value="澳门" <%if provinceCN="澳门" then%> selected <%end if%>> Macao 澳门</option>
<option value="内蒙古" <%if provinceCN="内蒙古" then%> selected <%end if%>>Neimenggu 内蒙古</option>
<option value="宁夏" <%if provinceCN="宁夏" then%> selected <%end if%>> Ningxia 宁夏</option>
<option value="青海" <%if provinceCN="青海" then%> selected <%end if%>> Qinghai 青海</option>
<option value="山东" <%if provinceCN="山东" then%> selected <%end if%>> Shandong 山东</option>
<option value="上海" <%if provinceCN="上海" then%> selected <%end if%>> Shanghai 上海</option>
<option value="山西" <%if provinceCN="山西" then%> selected <%end if%>> Shanxi 山西</option>
<option value="陕西" <%if provinceCN="陕西" then%> selected <%end if%>> Shanxi 陕西</option>
<option value="四川" <%if provinceCN="四川" then%> selected <%end if%>> Sichuan 四川</option>
<option value="台湾" <%if provinceCN="台湾" then%> selected <%end if%>> Taiwan 台湾</option>
<option value="天津" <%if provinceCN="天津" then%> selected <%end if%>> Tianjin 天津</option>
<option value="新疆" <%if provinceCN="新疆" then%> selected <%end if%>> Xinjiang 新疆</option>
<option value="西藏" <%if provinceCN="西藏" then%> selected <%end if%>> Xizang 西藏</option>
<option value="云南" <%if provinceCN="云南" then%> selected <%end if%>> Yunnan 云南</option>
</select> <select name=TPL_city class="wenbenkuang">
</select> <script language="JavaScript" >
<!--
function setcity() {
switch (document.form1.TPL_prov.value) {
case "" :
var cityOptions = new Array("", "");
break;
case "安徽" :
var cityOptions = new Array(
"Hefei 合肥(*)", "合肥",
"Anqing 安庆", "安庆",
"Bangbu 蚌埠", "蚌埠",
"Bozhou 亳州", "亳州",
"Chaohu 巢湖", "巢湖",
"Chuzhou 滁州", "滁州",
"Fuyang 阜阳", "阜阳",
"Guichi 贵池", "贵池",
"Huaibei 淮北", "淮北",
"Huaihua 淮化", "淮化",
"Huainan 淮南", "淮南",
"Huangshan 黄山", "黄山",
"Jiuhuashan 九华山", "九华山",
"Liuan 六安", "六安",
"Maanshan 马鞍山", "马鞍山",
"Suzhou 宿州", "宿州",
"Tongling 铜陵", "铜陵",
"Tunxu 屯溪", "屯溪",
"Wuhu 芜湖", "芜湖",
"Xuanchen 宣城", "宣城");
break;
case "北京" :
var cityOptions = new Array(
"Beijing 北京", "北京");
break;
case "重庆" :
var cityOptions = new Array(
"Chongqing 重庆", "重庆");
break;
case "福建" :
var cityOptions = new Array(
"Fuzhou 福州(*)", "福州",
"Fuan 福安", "福安",
"Longyan 龙岩", "龙岩",
"Nanping 南平", "南平",
"Ningde 宁德", "宁德",
"Putian 莆田", "莆田",
"Quanzhou 泉州", "泉州",
"Sanming 三明", "三明",
"Shaowu 邵武", "邵武",
"Shishi 石狮", "石狮",
"Tongan 永安", "永安",
"Wuyishan 武夷山", "武夷山",
"Xiamen 厦门", "厦门",
"Zhangzhou 漳州", "漳州");
break;
case "甘肃" :
var cityOptions = new Array(
"Lanzhou 兰州(*)", "兰州",
"Baiyin 白银", "白银",
"Dingxi 定西", "定西",
"Dunhuang 敦煌", "敦煌",
"Gannan 甘南", "甘南",
"Jinchang 金昌", "金昌",
"Jiuquan 酒泉", "酒泉",
"Linxia 临夏", "临夏",
"Pingliang 平凉", "平凉",
"Tianshui 天水", "天水",
"Wudu 武都", "武都",
"Xifeng 西峰", "西峰",
"Zhangye 张掖", "张掖");
break;
case "广东" :
var cityOptions = new Array(
"Guangzhou 广州(*)", "广州",
"Chaoyang 潮阳", "潮阳",
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -