ASP提交表单是先进行Form填写检测,检测完成没问题之后再执行写入数据库表操作。
相关源码:
<script language="javascript"> function check() { if (document.form1.company.value=="") { alert("公司名称不能为空!"); return false; } if (document.form1.addr.value=="") { alert("地址不能为空!"); document.form1.protypetitle.focus(); return false; } if (document.form1.dep.value=="") { alert("部门不能为空!"); return false; } if (document.form1.contacts.value=="") { alert("联系人不能为空!"); return false; } if (document.form1.phone.value=="") { alert("联系方式不能为空!"); return false; } if (document.form1.a01.checked || document.form1.a02.checked || document.form1.b01.checked || document.form1.b02.checked || document.form1.b03.checked) { return true; } else { alert("请选择调查问卷的相关选项"); return false; } return true; } </script> <form name="form1" action="" method="post" onsubmit="javascript:return check()"> <table border="0" width="100%"> <tr><td width="15%" valign="middle">公司名称:</td><td><input type="text" name="company" style="width:300px;"/> <span id="hintuser">* 必填</span></td></tr> <tr><td width="15%" valign="middle">地 址:</td><td><input type="text" name="addr" style="width:300px;"/> <span id="hintuser">* 必填</span></td></tr> <tr><td width="15%" valign="middle">部 门:</td><td><input type="text" name="dep" style="width:300px;"/> <span id="hintuser">* 必填</span></td></tr> <tr><td width="15%" valign="middle">联系人员:</td><td><input type="text" name="contacts" style="width:300px;"/> <span id="hintuser">* 必填</span></td></tr> <tr><td width="15%" valign="middle">联系电话:</td><td><input type="text" name="phone" style="width:300px;"/> <span id="hintuser">* 必填</span></td></tr> <tr><td width="15%" valign="middle">具體情况:</td><td><textarea name="qs_inf" style="width:500px;height:100px;"></textarea> <span id="hintuser"> 选填</span></td></tr> <tr><td colspan="2">A. 讨论述的相关设备<br /><input name="a01" type="checkbox" value="1,CNC加工中心<br />" />CNC加工中心<br /><input name="a02" type="checkbox" value="2,CNC车床<br />"/>CNC车床</td></tr> </table> <input type="submit" value="提交" style="padding:3px 5px;margin: 20px;float: right;";> </form> <% if request.Form<>"" then dim caseid,casename,company,addr,dep,contacts,phone,qs_inf,qs_wt,isdel,createtime,temp1,temp2 caseid=1 casename="压铸件的CNC后加工技术改造、自动化改造、设备大修等服务" company=trim(request.Form("company")) addr=trim(request.Form("addr")) dep=trim(request.Form("dep")) contacts=trim(request.Form("contacts")) phone=trim(request.Form("phone")) qs_inf=trim(request.Form("qs_inf")) if request.Form("a01")<>"" or request.Form("a02")<>"" then qs_wt="A. 讨论述的相关设备<br />"+trim(request.Form("a01"))+trim(request.Form("a02")) end if dim rs,sql set rs=server.CreateObject("adodb.recordset") sql="select * from colin" rs.open sql,objconn,1,2 rs.addnew() rs("caseid")=caseid rs("casename")=casename rs("company")=company rs("addr")=addr rs("dep")=dep rs("contacts")=contacts rs("phone")=phone rs("qs_inf")=qs_inf rs("qs_wt")=qs_wt rs("createtime")=now() rs.update() rs.close response.Write("<script language=‘javascript‘>alert(‘您已成功提交表单‘)</script>") end if %>
-完-
时间: 2024-10-10 05:45:18