edit.asp

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

<%@ codepage ="936" %>
<!--#include file="../../conn/dbconn2.asp" -->
<LINK href="../Style.css" rel=stylesheet type=text/css>
<script Language="JavaScript"> 
function CheckInput() 
{ 
if (document.Form1.user.value =="") 
{ 
alert("用户名不能为空！"); 
document.Form1.user.focus(); 
return (false); 
} 
if (document.Form1.pass.value =="") 
{ 
alert("密码不能为空！"); 
document.Form1.pass.focus(); 
return (false); 
}
if (document.Form1.name.value =="") 
{ 
alert("请输入您的姓名！"); 
document.Form1.name.focus(); 
return (false); 
} 
if (document.Form1.zw.value =="") 
{ 
alert("请输入您的职务！"); 
document.Form1.zw.focus(); 
return (false); 
} 
if (document.Form1.bm.value =="") 
{ 
alert("请输入您所在的部门！"); 
document.Form1.bm.focus(); 
return (false); 
} 
if (document.Form1.address.value =="") 
{ 
alert("请输入您公司地址！"); 
document.Form1.address.focus(); 
return (false); 
} 
if (document.Form1.post.value =="") 
{ 
alert("请输入邮政编码！"); 
document.Form1.post.focus(); 
return (false); 
} 
if (document.Form1.sf.value =="") 
{ 
alert("请选择省份！"); 
document.Form1.sf.focus(); 
return (false); 
} 
if (document.Form1.city.value =="") 
{ 
alert("请输入城市名！"); 
document.Form1.city.focus(); 
return (false); 
} 
if (document.Form1.phone.value =="") 
{ 
alert("请输入您的联系电话！"); 
document.Form1.phone.focus(); 
return (false); 
} 
if (document.Form1.email.value =="") 
{ 
alert("请输入您的电子邮件地址！"); 
document.Form1.email.focus(); 
return (false); 
} 
if (document.Form1.qymc.value =="") 
{ 
alert("请输入您公司的名称！"); 
document.Form1.qymc.focus(); 
return (false); 
} 
if (document.Form1.frdb.value =="") 
{ 
alert("公司的法人代表！"); 
document.Form1.frdb.focus(); 
return (false); 
} 
if (document.Form1.qyxz.value =="") 
{ 
alert("请输入您企业性质！"); 
document.Form1.qyxz.focus(); 
return (false); 
} 
if (document.Form1.zczj.value =="") 
{ 
alert("您公司的注册资金！"); 
document.Form1.zczj.focus(); 
return (false); 
} 
if (document.Form1.zycp.value =="") 
{ 
alert("请企业主要产品！"); 
document.Form1.zycp.focus(); 
return (false); 
} 
if (document.Form1.ygrs.value =="") 
{ 
alert("请选择您公司的雇员人数！"); 
document.Form1.ygrs.focus(); 
return (false); 
} 
if (document.Form1.nyye.value =="") 
{ 
alert("请选择您公司的年营业额！"); 
document.Form1.nyye.focus(); 
return (false); 
} 
if (document.Form1.qyjj.value =="")
{ 
alert("请输入公司简介！"); 
document.Form1.qyjj.focus(); 
return (false); 
} 
document.Form1.submit()
} 
</script>
<%
dim sql
dim rs
sql="select * from qyml where id="&request("id")
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<form method="post" action="save.asp?id=<%=request("id")%>" name="Form1">
<div align="center">
<center>
<TABLE border=0 cellspacing=0 width="98%" height="165" bordercolor="#3399FF" style="border-collapse: collapse" cellpadding="0">
<TBODY>
<tr>
<TD colspan=3 bgcolor="#e8f4ff" height=30 width="460"><b>修改注册会员信息</b></TD>
</tr> 
<tr><TD height="10" width="145" colspan="2"></TD></tr>
<TR>
<TD width=39>　</TD>
<TD width=103>会员登录名：</TD>
<TD width=312><INPUT maxLength=20 name="user" size="20" value=<%=rs("user")%>> <FONT color=#990000>*</font></TD>
</TR> 
<TR> 
<TD width="39">　</TD> 
<TD width="103">密 码：</TD> 
<TD width="312"><INPUT maxLength=20 name=pass type=password size="20" value=<%=rs("pass")%>> <FONT color=#990000>*</TD>
</TR> 
<TR> 
<TD width="39">　</TD> 
<TD width="103">确认密码：</TD> 
<TD width="312">
<INPUT maxLength=20 name=confirmPassword type=password value=<%=rs("pass")%> size="20"> <FONT color=#990000>*</FONT></TD>
</TR>
<TR> 
<TD width="39">　</TD> 
<TD width="103">密码提示问题</TD> 
<TD width="312"><INPUT maxLength=20 name=question value=<%=rs("question")%> size="20"> <FONT color=#990000>*</FONT></TD>
</TR> 
<TR vAlign="middle"> 
<TD width="39">　</TD> 
<TD width="103">密码提示答案：</TD> 
<TD width="312"><INPUT maxLength=20 name=answer value=<%=rs("answer")%> size="20"> <FONT color=#990000>*</FONT></TD>
</TR> 
<tr> 
<TD width="39">　</TD> 
<%if rs("ch")="先生" then%> 
<TD width="103">您的姓名：</TD> 
<TD height="29" width="482"><INPUT maxLength=100 name=name size="20" value=<%=rs("name")%>> <FONT color=#990000>*</FONT>&nbsp; <INPUT name=ch type=radio value="先生" checked>先生 &nbsp; 
<INPUT name=ch type=radio value="女士">女士</TD> 
<%else%>
<TD height="29" width="125"><INPUT maxLength=100 name=name size="20" value=<%=rs("name")%>> <FONT color=#990000 size=2>*</FONT>&nbsp; <INPUT name=ch type=radio value="先生">先生 &nbsp;<INPUT name=ch type=radio value="女士" checked>女士</TD> 
<%end if%>
</tr>
<tr> 
<TD width="39">　</TD> 
<TD width="103">您的职务：</TD> 
<TD width="312"><INPUT maxLength=100 name=zw size="20" value=<%=rs("zw")%>> </TD> 
</tr>
<tr>
<TD width="39">　</TD> 
<TD width="103">部&nbsp;&nbsp;&nbsp; 门：</TD> 
<TD width="312"><INPUT maxLength=100 name=bm size="21" value=<%=rs("bm")%>><FONT color=#990000>*</FONT> </TD> 
</tr> 
<tr> 
<TD width="39">　</TD> 
<TD width="103">街道地址：</TD> 
<TD width="312"><INPUT maxLength=250 name=address size=30 value=<%=rs("address")%>><FONT color=#990000>*</FONT></TD> 
</tr>
<tr>
<TD width="39">　</TD> 
<TD width="103">邮&nbsp;&nbsp;&nbsp; 编：</TD> 
<TD width="312"><INPUT class=f10 maxLength=8 name=post size=8 value=<%=rs("post")%>><FONT color=#990000>*</FONT></TD> 
</tr> 
<tr> 
<TD width="39">　</TD> 
<TD width="103">省级地区：</TD> 
<TD width="312">
<SELECT name=sf>
<option <%if rs("sf")="北京" then response.write "selected"%> value="北京">北京</option>
<option <%if rs("sf")="上海" then response.write "selected"%> value="上海">上海</option> 
<option <%if rs("sf")="天津" then response.write "selected"%> value="天津">天津</option>
<option <%if rs("sf")="重庆" then response.write "selected"%> value="重庆">重庆</option>
<option <%if rs("sf")="黑龙江" then response.write "selected"%> value="黑龙江">黑龙江</option> 
<option <%if rs("sf")="吉林" then response.write "selected"%> value="吉林">吉林</option>
<option <%if rs("sf")="辽宁" then response.write "selected"%> value="辽宁">辽宁</option>
<option <%if rs("sf")="内蒙古" then response.write "selected"%> value="内蒙古">内蒙古</option> 
<option <%if rs("sf")="河北" then response.write "selected"%> value="河北">河北</option>
<option <%if rs("sf")="新疆" then response.write "selected"%> value="新疆">新疆</option>
<option <%if rs("sf")="甘肃" then response.write "selected"%> value="甘肃">甘肃</option>
<option <%if rs("sf")="宁夏" then response.write "selected"%> value="宁夏">宁夏</option> 
<option <%if rs("sf")="山西" then response.write "selected"%> value="山西">山西</option> 
<option <%if rs("sf")="山东" then response.write "selected"%> value="山东">山东</option> 
<option <%if rs("sf")="青海" then response.write "selected"%> value="青海">青海</option> 
<option <%if rs("sf")="西藏" then response.write "selected"%> value="西藏">西藏</option> 
<option <%if rs("sf")="四川" then response.write "selected"%> value="四川">四川</option> 
<option <%if rs("sf")="陕西" then response.write "selected"%> value="陕西">陕西</option> 
<option <%if rs("sf")="河南" then response.write "selected"%> value="河南">河南</option> 
<option <%if rs("sf")="湖北" then response.write "selected"%> value="湖北">湖北</option> 
<option <%if rs("sf")="安徽" then response.write "selected"%> value="安徽">安徽</option> 
<option <%if rs("sf")="江苏" then response.write "selected"%> value="江苏">江苏</option> 
<option <%if rs("sf")="浙江" then response.write "selected"%> value="浙江">浙江</option> 
<option <%if rs("sf")="江西" then response.write "selected"%> value="江西">江西</option> 
<option <%if rs("sf")="湖南" then response.write "selected"%> value="湖南">湖南</option> 
<option <%if rs("sf")="贵州" then response.write "selected"%> value="贵州">贵州</option> 
<option <%if rs("sf")="云南" then response.write "selected"%> value="云南">云南</option> 
<option <%if rs("sf")="广西" then response.write "selected"%> value="广西">广西</option> 
<option <%if rs("sf")="广东" then response.write "selected"%> value="广东">广东</option> 
<option <%if rs("sf")="福建" then response.write "selected"%> value="福建">福建</option> 
<option <%if rs("sf")="海南" then response.write "selected"%> value="海南">海南</option> 
<option <%if rs("sf")="香港" then response.write "selected"%> value="香港">香港</option> 
<option <%if rs("sf")="澳门" then response.write "selected"%> value="澳门">澳门</option> 
<option <%if rs("sf")="台湾" then response.write "selected"%> value="台湾">台湾</option>
<option <%if rs("sf")="其他" then response.write "selected"%> value="其他">其他</option> 
</select><FONT color=#990000 size=2>*</FONT></TD> 
</tr>
<tr>
<TD width="39">　</TD> 
<TD width="103">城&nbsp;&nbsp;&nbsp; 市：</TD> 
<TD width="312"><INPUT class=f11 maxLength=80 name=city size=21 value=<%=rs("city")%>><FONT color=#990000 size=2>*</FONT> </TD> 
</tr> 
<tr> 
<TD width="39">　</TD> 
<TD width="103">电话：</TD> 
<TD width="312"><INPUT class=f10 name=phone size=30 value=<%=rs("phone")%>><FONT color=#990000 size=2>*</FONT> </TD> 
</tr>
<tr>
<TD width="39">　</TD> 
<TD width="103">传&nbsp;&nbsp;&nbsp; 真：</TD> 
<TD width="312"><INPUT class=f10 name=fax size=21 value=<%=rs("fax")%>></TD> 
</tr> 
<tr> 
<TD width="39">　</TD> 
<TD width="103">您的电子邮件：</TD> 
<TD width="312"><INPUT class=f10 maxLength=100 name=email size=30 value=<%=rs("email")%>><FONT color=#990000 size=2>*</FONT>&nbsp;</TD> 
</tr>
<tr>
<TD width="39">　</TD> 
<TD width="103">网&nbsp;&nbsp;&nbsp; 址：</TD> 
<TD width="312"><INPUT class=f10 maxLength=100 name=web size=25 value=<%=rs("web")%>></td>
</tr>
<tr><TD height="10" width="145" colspan="2"></TD></tr>
<tr>
<TD colspan=3 bgcolor="#e8f4ff" height=30 width="460"><b>修改公司信息</b></TD>
</tr> 
<tr><TD height="10" width="145" colspan="2"></TD></tr>
<tr> 
<TD width="145" align="center" colspan="2">公司名称：</TD>
<TD width="312"><INPUT class=f11 maxLength=80 name=qymc size=35 value=<%=rs("qymc")%>><FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">法人代表：</TD>
<TD width="312"><INPUT class=f11 maxLength=10 name=frdb size=21 value=<%=rs("frdb")%>><FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">公司性质：</TD>
<TD width="312" ><INPUT class=f11 maxLength=20 name=qyxz size=24 value=<%=rs("qyxz")%>><FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">注册资金：</TD>
<TD width="312"><INPUT class=f11 maxLength=10 name=zczj size=21 value=<%=rs("zczj")%>>万元<FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">主要产品：</TD>
<TD width="312"><INPUT class=f11 maxLength=50 name=zycp size=35 value=<%=rs("zycp")%>><FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">雇员人数：</TD>
<TD width="312"> 
<SELECT name=ygrs>
<OPTION <%if rs("ygrs")=1 then response.write "selected"%> value="1">5 人以下</option>
<OPTION <%if rs("ygrs")=2 then response.write "selected"%> value="2">5 - 10 人</option>
<OPTION <%if rs("ygrs")=3 then response.write "selected" %> value="3">11 - 50 人</option>
<OPTION <%if rs("ygrs")=4 then response.write "selected" %> value="4">51 - 100 人</option>
<OPTION <%if rs("ygrs")=5 then response.write "selected" %> value="5">101 - 500 人</option>
<OPTION <%if rs("ygrs")=6 then response.write "selected" %> value="6">501 - 1000 人</option>
<OPTION <%if rs("ygrs")=7 then response.write "selected" %> value="7">1000 人以上</OPTION>
</SELECT><FONT color=#990000 size=2>*</FONT>
</TD>
</tr>
<tr>
<TD width="145" align="center" colspan="2">年营业额：</TD>
<TD width="312">
<SELECT name=nyye>
<OPTION <%if rs("nyye")=1 then response.write "selected"%> value="1">人民币100万元以下</option>
<OPTION <%if rs("nyye")=2 then response.write "selected"%> value="2">人民币100-250万元</option>
<OPTION <%if rs("nyye")=3 then response.write "selected"%> value="3">人民币250-500万元</option>
<OPTION <%if rs("nyye")=4 then response.write "selected"%> value="4">人民币500-1000万元</option>
<OPTION <%if rs("nyye")=5 then response.write "selected"%> value="5">人民币1000-5000万元</option>
<OPTION <%if rs("nyye")=6 then response.write "selected"%> value="6">人民币5000万元-1亿元</option>
<OPTION <%if rs("nyye")=7 then response.write "selected"%> value="7">人民币1 亿元以上</OPTION>
</OPTION></SELECT><FONT color=#990000 size=2>*</FONT></TD>
</tr>
<tr> 
<TD width="145" align="center" colspan="2">开 户 行：</TD> 
<TD width="312"><INPUT class=f11 maxLength=100 name=bank size=34 value=<%=rs("bank")%>></TD> 
</tr>
<tr> 
<TD width="145" align="center" colspan="2">帐&nbsp;&nbsp;&nbsp; 号：</TD> 
<TD width="312"><INPUT class=f11 maxLength=100 name=zh size=30 value=<%=rs("zh")%>></TD> 
</tr> 
<tr> 
<TD width="145" align="center" colspan="2">公司介绍：</TD>
<TD width="312"><textarea class=f11 rows="7" name="qyjj" cols="60"><%=rs("qyjj")%></textarea><font color="#990000">*</font></TD>
</tr>
<tr><TD height="10" width="145" colspan="2"></TD></tr>
<TR>
<TD align=center colspan=3 bgcolor="#e8f4ff" width="460"><input type="button" value=" 修改 " onclick="CheckInput()">&nbsp;&nbsp;&nbsp;<INPUT name=Reset type=reset value=" 重填 "></TD>
</TR>
</TBODY>
</TABLE>
</center>
</div>
</FORM>