码迷,mamicode.com
首页 > Web开发 > 详细

ASP FORM表单提交判断

时间:2015-09-17 13:17:02      阅读:214      评论:0      收藏:0      [点我收藏+]

标签:

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
        %>

 

-完-

ASP FORM表单提交判断

标签:

原文地址:http://www.cnblogs.com/colinliu/p/4815916.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!