表单填写有错还能提交怎么解决?

polinhua 2011-12-03 03:46:18

填写表单页1代码

<html>
<head>
<title>业务范围</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<BODY bgColor=#ffffff leftMargin=0 topMargin=0 onload=init(); marginheight="0"
marginwidth="0">
<div id=menuDiv style="Z-INDEX: 1000; VISIBILITY: hidden; WIDTH: 1px; POSITION: absolute; HEIGHT: 1px; BACKGROUND-COLOR: #ffffff;">
</div>
<table cellSpacing=0 cellPadding=0 width=1000 align=center border=0>
<tr>
<td>
<table height=80 cellSpacing=0 cellPadding=0 width=1000 background=/Article/images/t-1.jpg border=0>
<tr>
<td width=9></td>
<td width=309><IMG height=55 src="/Article/images/addinol-logo.png" width=304></td>
<td width="668" background="/Article/images/ad-top.jpg"> </td>
<td width="14"> </td>
</tr>
</table> </td>
</tr>
<tr>
<td background=/Article/images/5.jpg>
<table height=30 cellSpacing=0 cellPadding=0 width=1000 align=center border=0>
<tr>
<td>
</td>
</tr>
</table> </td>
</tr>
<tr>
<td height="195">td>
</tr>
<tr>
<td height="30"><table height=30 cellSpacing=0 cellPadding=0 width=1000 align=center border=0 background="/Article/images/5.jpg">
<tr>
<td align=middle width=32><IMG height=17 width=16></td>
<td width=612>您现在的位置：<a class='LinkPath' href='http://localhost/'>网站首页</a>>><a class='LinkPath' href='/Article/Index.html'>文章中心</a>>>正文 </td>
<td width=200 align="right"> 欢迎浏览网站: </td>
<td width=167 align="left" >td>
</tr>
</table></td>
</tr>
</table>

<table border="0" align="center" cellpadding="0" cellspacing="0">

<td style="padding:8px;"><form name="bmbd" action="/SaveBmche.asp" method="post" onSubmit="return CheckForm();"> <DIV align=center>
<TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
<TBODY>
<TR>
<TD width="30%">

<table border="0">
<tr>
<td><table width="600" border="0" cellpadding="0" cellspacing="0">

<tr>
<td width="14" height="18"></td>
<td width="400"><b>服务信息</b></td>
<td width="236"></td>
</tr>
<tr>
<td width="14"></td>
<td colspan="2" align="center"><b><span class="red"height="25">需服务的项目请您点选,不需的可以不用选</span></b></td>
</tr>
<tr>
<td></td>
<td>1、更换</td>
<td><input type='radio'name="wt1" id="wt1"value='是'></td>
</tr>
<tr>
<td></td>
<td>2、更换</td>
<td><input type='radio'name="wt2" id="wt2"value='是'></td>
</tr>
<tr>
<td></td>
<td>3、更换</td>
<td><input type='radio'name="wt3" id="wt3"value='是'></td>
</tr>
<tr>
<td></td>
<td>4、更换</td>
<td><input type='radio'name="wt4" id="wt4"value='是'></td>
</tr>
<tr>
<td></td>
<td>5、更换</td>
<td><input type='radio'name="wt5" id="wt5"value='是'></td>
</tr>
<tr>
<td></td>
<td>6、免折</td>
<td><input type='radio'name="wt6" id="wt6"value='是'></td>
</tr>
<tr>
<td></td>
<td>7、更换</td>
<td><input type='radio'name="wt7" id="wt7"value='是'></td>
</tr>
<tr>
<td></td>
<td>8、抛光</td>
<td><input type='radio'name="wt8" id="wt8"value='是'></td>
</tr>
<tr>
<td></td>
<td>9、打腊</td>
<td><input type='radio'name="wt9" id="wt9"value='是'></td>
</tr>
<tr>
<td></td>
<td>10、封粙</td>
<td><input type='radio'name="wt10" id="wt10"value='是'></td>
</tr>
<tr>
<td height="22"></td>
<td ></td>
<td></td>
</tr>
<tr>
<td height="22"></td>
<td ><b>联系信息</b></td>
<td></td>
</tr>

<tr>
<td></td>
<td colspan="2" rowspan="3"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="19%">1、品牌：</td>
<td width="81%"><input type="text" class="input_130" name="clpp" id="clpp"> <span class="red">*/需填</span> </td>
</tr>

<tr>
<td width="19%">2、数量：</td>
<td width="81%"><input type="text" class="input_130" name="clsl" id="clsl"> <span class="red">*/需填</span> </td>
</tr>
<tr>
<td width="19%">3、姓名：</td>
<td width="81%"><input type="text" class="input_130" name="czxm" id="czxm"> <span class="red">*/姓名不能为空</span> </td>
</tr>
<tr>
<td width="19%">4、电话号码：</td>
<td width="81%"><input type="text" class="input_130" name="Tel" id="Tel"> <span class="red">需填请用数字填写电话</span> </td>
</tr>

<tr>
<td width="19%">6、电子邮件：</td>
<td width="81%"><input type="text" class="input_130" name="Mail" id="Mail"></td>
</tr>

<tr>
<td width="19%">7、联系地址：</td>
<td width="81%"><input type="text" class="input_130" name="adress" id="adress"> <span class="red">地址不能为空</span> </td>
</tr>

<tr>
<td>8、其他说明：</td>
<td> <textarea name="Content" rows="4" class="textarea_370" id="Content"></textarea></td>
</tr>
</table></td>
</tr>
<tr>
<td></td>
</tr>
<tr>
<td></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<td colspan="5"> </td>
</TR>
</TBODY></TABLE>
</DIV>
<P align=center> <input type="reset" name="reset" value="清空重填" class="submit">

<input type="submit" value="提交" onMouseOut="this.className='submit_sub'"class="submit_sub" onsubmit="return ChkField()">
</P>
</form></td>
</tr>
</table>
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<table width="1000" height="101" border="0" align="center" cellpadding="0" cellspacing="0" background="gzimg/bottom-2.jpg">
<tr>
<td width="316" background="gzimg/bottom-1.jpg"> </td>
<td width="668" background="gzimg/bottom-3.jpg"></td>
<td width="16"> </td>
</tr>
</table>

</body>
</html>

保存页2代码



<%
Dim clpp, clsl, czxm, Mail, Tel, Content, adress, addtime, wt1,wt2,wt3,wt4,wt5,wt6,wt7,wt8,wt9,wt10, exec
set conn=server.createobject("adodb.connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.open=server.mappath("/Database/#gzsw#.mdb")
clpp=request.form("clpp")
clsl=request.form("clsl")
czxm=request.form("czxm")
Mail = request.Form("Mail")
Tel=request.form("Tel")
Content=request.form("Content")
adress=request.form("adress")
Addtime=request.form("now()")
wt1=request.form("wt1")
wt2=request.form("wt2")
wt3=request.form("wt3")
wt4=request.form("wt4")
wt5=request.form("wt5")
wt6=request.form("wt6")
wt7=request.form("wt7")
wt8=request.form("wt8")
wt9=request.form("wt9")
wt10=request.form("wt10")

If len(clpp) < 2 Then
response.write "<script>alert(""请输入车辆品牌!"");history.back(-1);</script>"
End If
If len(clsl) < 1 Then
response.write "<script>alert(""请输入车量数量!"");history.back(-1);</script>"
End If
If len(czxm) < 2 Then
response.write "<script>alert(""请输入车主姓名!"");history.back(-1);</script>"
End If
If len(Tel) < 8 Then
response.write "<script>alert(""请正确输入电话号码!"");history.back(-1);</script>"
End If
If len(adress) < 2 Then
response.write "<script>alert(""请输入联系地址!"");history.back(-1);</script>"
End If

exec="insert into PE_Zxbm(clpp,clsl,czxm,Mail,Tel,Content,adress,wt1,wt2,wt3,wt4,wt5,wt6,wt7,wt8,wt9,wt10,addtime)values('"+clpp+"','"+clsl+"','"+czxm+"','"+Mail+"','"+Tel+"','"+Content+"','"+adress+"','"+wt1+"','"+wt2+"','"+wt3+"','"+wt4+"','"+wt5+"','"+wt6+"','"+wt7+"','"+wt8+"','"+wt9+"','"+wt10+"',now())"

conn.execute exec
conn.close
set conn=nothing
response.write "<script>alert(""报名成功!"");location.replace('index.html');</script>"
%>

...全文