edit.asp

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

<%@ codepage ="936" %>
<!--#include file="../../conn/dbconn2.asp" -->
<LINK href="../Style.css" rel=stylesheet type=text/css>
<script Language="JavaScript"> 
function check() 
{ 
if (document.Form1.qymc.value =="") 
{ 
alert("请输入您公司的名称！"); 
document.Form1.qymc.focus(); 
return (false); 
} 
if (document.Form1.address.value =="") 
{ 
alert("请输入您公司地址！"); 
document.Form1.address.focus(); 
return (false); 
} 
if (document.Form1.name.value =="") 
{ 
alert("请输入您的姓名！"); 
document.Form1.name.focus(); 
return (false); 
} 
if (document.Form1.post.value =="") 
{ 
alert("请输入邮政编码！"); 
document.Form1.post.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.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.qyjj.value =="")
{ 
alert("请输入公司简介！"); 
document.Form1.qyjj.focus(); 
return (false); 
} 
document.Form1.submit()
}
</script>
<%
dim sql
dim rs
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from Qyml where id="&request("id")&""
rs.open sql,conn,1,1
%>
<form method="post" action="save.asp?id=<%=request("id")%>" name="Form1">
<center>
<TABLE cellPadding=4 border=0 cellspacing=1 width="100%">
<TBODY>
<TR height="30">
<TD colspan=2 bgcolor="#e8f4ff"><b>修改公司基本修改</b></TD>
</TR>
<TR><TD height=15></TD></TR>
<tr>
<TD align="center">公司名称：</TD>
<TD><INPUT name=qymc size=50 value=<%=rs("qymc")%>> <FONT color=#990000 size=2>*</FONT></TD>
</tr> 
<tr> 
<TD align="center">公司地址：</TD> 
<TD><INPUT name=address size=50 value=<%=rs("address")%>> <FONT color=#990000>*</FONT></TD> 
</tr>
<tr> 
<TD width=40% align="center">您的姓名：</TD> 
<TD width=60%><INPUT name=name size="20" value=<%=rs("name")%>> <FONT color=#990000>*</FONT>&nbsp; <INPUT <%if rs("ch")="先生" then response.write "checked"%> name=ch type=radio value="先生">先生 &nbsp;<INPUT <%if rs("ch")="女士" then response.write "checked"%> name=ch type=radio value="女士">女士</TD> 
</tr> 
<tr>
<TD align="center">邮&nbsp;&nbsp;&nbsp; 编：</font></TD>
<TD><INPUT name=post size=8 value=<%=rs("post")%>> <FONT color=#990000>*</FONT></TD> 
</tr> 
<tr> 
<TD align="center">电&nbsp;&nbsp;&nbsp; 话：</TD> 
<TD><INPUT name=phone size=25 value=<%=rs("phone")%>> <FONT color=#990000>*</FONT> </TD> 
</tr>
<tr>
<TD align="center">传&nbsp;&nbsp;&nbsp; 真：</TD>
<TD><INPUT name=fax size=25 value=<%=rs("fax")%>></TD> 
</tr> 
<tr> 
<TD align="center">电子邮件：</TD> 
<TD><INPUT name=email size=50 value=<%=rs("email")%>><FONT color=#990000> *</FONT></TD> 
</tr>
<tr>
<TD align="center">网&nbsp;&nbsp;&nbsp; 址：</TD> 
<TD><INPUT name=web size=50 value=<%=rs("web")%>></TD> 
</tr> 
<tr>
<TD align="center">法人代表：</TD>
<TD><INPUT name=frdb size=20 value=<%=rs("frdb")%>> <FONT color=#990000>*</FONT></TD>
</tr>
<tr>
<TD align="center">公司性质：</TD>
<TD><INPUT name=qyxz size=25 value=<%=rs("qyxz")%>> <FONT color=#990000>*</FONT></TD>
</tr>
<tr> 
<TD align="center">注册资金：</TD>
<TD><INPUT name=zczj size=25 value=<%=rs("zczj")%>> 万元 <FONT color=#990000>*</FONT></TD>
</tr>
<tr>
<TD align="center">主要产品：</TD>
<TD><INPUT name=zycp size=50 value=<%=rs("zycp")%>> <FONT color=#990000>*</FONT></TD>
</tr> 
<tr>
<TD align="center">雇员人数：</TD>
<TD>
<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>*</FONT>
</TD>
</tr>
<tr>
<TD align="center">年营业额：</TD>
<TD>
<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>
</SELECT> <FONT color=#990000>*</FONT></TD>
</tr>
<tr>
<TD align="center">年营业额：</TD>
<TD><INPUT <%if instr(rs("qylb"),"生产型")<>0 then response.write "checked" %> name=qylb type=checkbox value="生产型">生产型 
<INPUT <%if instr(rs("qylb"),"贸易型")<>0 then response.write "checked" %> name=qylb type=checkbox value="贸易型">贸易型
<INPUT <%if instr(rs("qylb"),"服务型")<>0 then response.write "checked" %> name=qylb type=checkbox value="服务型">服务型
<INPUT <%if instr(rs("qylb"),"政府或其他机构")<>0 then response.write "checked" %> name=qylb type=checkbox value="政府或其他机构">政府或其他机构 <FONT color=#990000>*</FONT>
</TD>
</tr>
<tr> 
<TD align="center">开 户 行：</TD> 
<TD><INPUT name=bank size=30 value=<%=rs("bank")%>></TD> 
</tr>
<tr>
<TD align="center">帐&nbsp;&nbsp;&nbsp; 号：</TD> 
<TD><INPUT class=f11 maxLength=100 name=zh size=30 value=<%=rs("zh")%>></TD> 
</tr> 
<tr> 
<TD align="center">公司介绍：</TD>
<TD><textarea rows="7" name="qyjj" cols="60"><%=rs("qyjj")%></textarea><font color="#990000">*</font></TD>
</tr>
<TR><TD height=15></TD></TR>
<TR height="30">
<TD colspan=2 align=center bgcolor="#e8f4ff" height="30"><input type="button" value=" 修 改 " onclick=check()>&nbsp; <input type="button" name="Submit" value=" 返 回 " onclick=history.go(-1);></TD>
</TR>
</TBODY>
</TABLE>
</FORM>