⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 afgl_cy_dw_dj.asp

📁 U盘身份识别软件
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="WNP_INCLUDE.ASP" -->
<div align="center">
<input type="button" name="Submit" value="新  增" onClick="location.href='?action=addIF';">
</div>
<script language="javascript">
<!--
function checkForm(){
  if(form1.CY_DW_DJ_name.value == ""){
    alert("企业名称不能为空!");
	form1.CY_DW_DJ_name.focus();
	return false;
  }
}
//-->
</script>
<!--保存添加  -->
<%
sub saveAdd()

  CY_DW_DJ_name = trim(request.Form("CY_DW_DJ_name"))
  if CY_DW_DJ_name ="" then
    response.Write("<script language=javascript>alert('企业名称不能为空!');history.back();</script>")
  end if
  CY_DW_DJ_name = trim(request.Form("CY_DW_DJ_name"))
  CY_DW_DJ_phone = trim(request.Form("CY_DW_DJ_phone"))
  CY_DW_DJ_add = trim(request.Form("CY_DW_DJ_add"))
  CY_DW_DJ_code = trim(request.Form("CY_DW_DJ_code"))
  CY_DW_DJ_addDate = trim(request.Form("CY_DW_DJ_addDate"))
  CY_DW_DJ_money = trim(request.Form("CY_DW_DJ_money"))
  CY_DW_DJ_email = trim(request.Form("CY_DW_DJ_email"))
  CY_DW_DJ_count_zg = trim(request.Form("CY_DW_DJ_count_zg"))
  CY_DW_DJ_count_js = trim(request.Form("CY_DW_DJ_count_js"))
  CY_DW_DJ_jjxz = trim(request.Form("CY_DW_DJ_jjxz"))
  CY_DW_DJ_fzjg = trim(request.Form("CY_DW_DJ_fzjg"))
  CY_DW_DJ_zzbh = trim(request.Form("CY_DW_DJ_zzbh"))
  CY_DW_DJ_dmbh = trim(request.Form("CY_DW_DJ_dmbh"))
  CY_DW_DJ_zlbh = trim(request.Form("CY_DW_DJ_zlbh"))
  CY_DW_DJ_gcmc = trim(request.Form("CY_DW_DJ_gcmc"))
  CY_DW_DJ_bgmj = trim(request.Form("CY_DW_DJ_bgmj"))
  CY_DW_DJ_bgCount = trim(request.Form("CY_DW_DJ_bgCount"))
  CY_DW_DJ_add1 = trim(request.Form("CY_DW_DJ_add1"))
  CY_DW_DJ_master1 = trim(request.Form("CY_DW_DJ_master1"))
  CY_DW_DJ_phone1 = trim(request.Form("CY_DW_DJ_phone1"))
  CY_DW_DJ_otherUnit = trim(request.Form("CY_DW_DJ_otherUnit"))
  CY_DW_DJ_appPro = trim(request.Form("CY_DW_DJ_appPro"))
  CY_DW_DJ_master2 = trim(request.Form("CY_DW_DJ_master2"))
  CY_DW_DJ_phone2 = trim(request.Form("CY_DW_DJ_phone2"))
  CY_DW_DJ_phone3 = trim(request.Form("CY_DW_DJ_phone3"))
  CY_DW_DJ_gaizh = trim(request.Form("CY_DW_DJ_gaizh"))
  CY_DW_DJ_date = date()

  sql = "select * from AFGL_CY_DW_DJ where CY_DW_DJ_name = '"&CY_DW_DJ_name&"'"
  rs.open sql,conn,1,1
  if not rs.eof then
    rs.close
	response.Write("<script language=javascript>alert('名称重复!');location.href='?';</script>")
  else

    rs.close
    sql = "select * from AFGL_CY_DW_DJ"
    rs.open sql,conn,1,3
    rs.addnew
    if CY_DW_DJ_name <> "" then
      rs("CY_DW_DJ_name") = CY_DW_DJ_name
	end if
    if CY_DW_DJ_phone <> "" then
      rs("CY_DW_DJ_phone") = CY_DW_DJ_phone
	end if
    if CY_DW_DJ_add <> "" then
      rs("CY_DW_DJ_add") = CY_DW_DJ_add
	end if
    if CY_DW_DJ_code <> "" then
      rs("CY_DW_DJ_code") = CY_DW_DJ_code
	end if
    if CY_DW_DJ_addDate <> "" then
      rs("CY_DW_DJ_addDate") = CY_DW_DJ_addDate
	end if
    if CY_DW_DJ_money <> "" then
      rs("CY_DW_DJ_money") = CY_DW_DJ_money
	end if
    if CY_DW_DJ_email <> "" then
      rs("CY_DW_DJ_email") = CY_DW_DJ_email
	end if
    if CY_DW_DJ_count_zg <> "" then
      rs("CY_DW_DJ_count_zg") = CY_DW_DJ_count_zg
	end if
    if CY_DW_DJ_count_js <> "" then
      rs("CY_DW_DJ_count_js") = CY_DW_DJ_count_js
	end if
    if CY_DW_DJ_jjxz <> "" then
      rs("CY_DW_DJ_jjxz") = CY_DW_DJ_jjxz
	end if
    if CY_DW_DJ_fzjg <> "" then
      rs("CY_DW_DJ_fzjg") = CY_DW_DJ_fzjg
	end if
    if CY_DW_DJ_zzbh <> "" then
      rs("CY_DW_DJ_zzbh") = CY_DW_DJ_zzbh
	end if
    if CY_DW_DJ_dmbh <> "" then
      rs("CY_DW_DJ_dmbh") = CY_DW_DJ_dmbh
	end if
    if CY_DW_DJ_zlbh <> "" then
      rs("CY_DW_DJ_zlbh") = CY_DW_DJ_zlbh
	end if
    if CY_DW_DJ_gcmc <> "" then
      rs("CY_DW_DJ_gcmc") = CY_DW_DJ_gcmc
	end if
    if CY_DW_DJ_bgmj <> "" then
      rs("CY_DW_DJ_bgmj") = CY_DW_DJ_bgmj
	end if
    if CY_DW_DJ_bgCount <> "" then
      rs("CY_DW_DJ_bgCount") = CY_DW_DJ_bgCount
	end if
    if CY_DW_DJ_add1 <> "" then
      rs("CY_DW_DJ_add1") = CY_DW_DJ_add1
	end if
    if CY_DW_DJ_master1 <> "" then
      rs("CY_DW_DJ_master1") = CY_DW_DJ_master1
	end if
    if CY_DW_DJ_phone1 <> "" then
      rs("CY_DW_DJ_phone1") = CY_DW_DJ_phone1
	end if
    if CY_DW_DJ_otherUnit <> "" then
      rs("CY_DW_DJ_otherUnit") = CY_DW_DJ_otherUnit
	end if
    if CY_DW_DJ_appPro <> "" then
      rs("CY_DW_DJ_appPro") = CY_DW_DJ_appPro
	end if
    if CY_DW_DJ_master2 <> "" then
      rs("CY_DW_DJ_master2") = CY_DW_DJ_master2
	end if
    if CY_DW_DJ_phone2 <> "" then
      rs("CY_DW_DJ_phone2") = CY_DW_DJ_phone2
	end if
    if CY_DW_DJ_phone3 <> "" then
      rs("CY_DW_DJ_phone3") = CY_DW_DJ_phone3
	end if
    if CY_DW_DJ_gaizh <> "" then
      rs("CY_DW_DJ_gaizh") = CY_DW_DJ_gaizh
	end if
    if CY_DW_DJ_date <> "" then
      rs("CY_DW_DJ_date") = CY_DW_DJ_date
	end if

    rs.update
    rs.close
	response.Redirect("?")
  end if

end sub
%>

<!-- 企业名称列表 -->
<%
sub listAll()
  sql = "select * from AFGL_CY_DW_DJ where CY_DW_DJ_name is not null"
  rs.open sql,conn,1,1
  if not rs.eof then
%>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="0" class="FPtalbe">
  <tr>
    <td height="30" colspan="8" align="center"><span class="blackTitle">陕西省安全技术防范从业单位登记备案表(列表)</span></td>
  </tr>
  <tr>
    <td align="center"> 企业名称</td>
    <td align="center">企业地址</td>
    <td align="center"> 邮政编码</td>
    <td align="center"> 企业成立时间</td>
    <td align="center"> 负责人</td>
    <td align="center"> 电话</td>
    <td width="70" align="center">修改</td>
    <td width="70" align="center">删除</td>
  </tr>
<%
    do while not rs.eof
%>
  <tr>
    <td><%=rs("CY_DW_DJ_name")%>&nbsp;</td>
    <td><%=rs("CY_DW_DJ_add")%>&nbsp;</td>
    <td><%=rs("CY_DW_DJ_code")%>&nbsp;</td>
    <td><%=rs("CY_DW_DJ_addDate")%>&nbsp;</td>
    <td><%=rs("CY_DW_DJ_master1")%>&nbsp;</td>
    <td><%=rs("CY_DW_DJ_phone")%>&nbsp;</td>
    <td align="center"><input type="button" name="Submit" value="修改&gt;&gt;" onClick="location.href='?action=edit&id=<%=rs("id")%>';"></td>
    <td align="center"><input type="button" name="Submit" value="删除&gt;&gt;" onClick="if(confirm('确认删除该条记录?')){location.href='?action=delItem&id=<%=rs("id")%>';}"></td>
  </tr>
<%
	rs.movenext
	loop
%>
</table>
<%
  else
    response.Write("<p align=center>暂时没有记录,请点击""新增""按钮添加!</p>")
  end if
  rs.close
end sub
%>
<!-- 添加界面 -->
<%
sub addIF()
%>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="0" class="FPtalbe">
<form name="form1" method="post" action="?action=saveAdd" onSubmit="return checkForm();">
  <tr align="center">
    <td height="30" colspan="6" class="blackTitle">陕西省安全技术防范从业单位登记备案表</td>
    </tr>
  <tr>
    <td width="100" align="center">企业名称</td>
    <td colspan="3"><input name="CY_DW_DJ_name" type="text" id="CY_DW_DJ_name" size="25">
      <span style="color: #FF0000">*</span></td>
    <td>电话</td>
    <td><input name="CY_DW_DJ_phone" type="text" id="CY_DW_DJ_phone" size="25"></td>
  </tr>
  <tr>
    <td align="center">企业地址</td>
    <td colspan="3"><input name="CY_DW_DJ_add" type="text" id="CY_DW_DJ_add" size="25"></td>
    <td>邮政编码</td>
    <td><input name="CY_DW_DJ_code" type="text" id="CY_DW_DJ_code" size="25"></td>
  </tr>
  <tr>
    <td align="center">企业成立时间</td>
    <td><input name="CY_DW_DJ_addDate" type="text" id="CY_DW_DJ_addDate" size="15"> </td>
    <td>注册资金</td>
    <td><input name="CY_DW_DJ_money" type="text" id="CY_DW_DJ_money" size="15"></td>
    <td width="100" align="center">电子邮箱</td>
    <td><input name="CY_DW_DJ_email" type="text" id="CY_DW_DJ_email" size="15"></td>
  </tr>
  <tr>
    <td align="center">企业职工人数</td>
    <td><input name="CY_DW_DJ_count_zg" type="text" id="CY_DW_DJ_count_zg" size="15"></td>
    <td>技术人员人数</td>
    <td><input name="CY_DW_DJ_count_js" type="text" id="CY_DW_DJ_count_js" size="15"></td>
    <td align="center">经济性质</td>
    <td><input name="CY_DW_DJ_jjxz" type="text" id="CY_DW_DJ_jjxz" size="15"></td>
    </tr>
  <tr>
    <td align="center">营业执照发放机关</td>
    <td colspan="3"><input name="CY_DW_DJ_fzjg" type="text" id="CY_DW_DJ_fzjg" size="25"></td>
    <td align="center">营业执照编号</td>
    <td><input name="CY_DW_DJ_zzbh" type="text" id="CY_DW_DJ_zzbh" size="25"></td>
  </tr>
  <tr>
    <td align="center">机构代码证书编号</td>
    <td colspan="5"><input name="CY_DW_DJ_dmbh" type="text" id="CY_DW_DJ_dmbh" size="25">      </td>
    </tr>
  <tr>
    <td align="center">质量体系认证证书名称及编号</td>
    <td colspan="5"><input name="CY_DW_DJ_zlbh" type="text" id="CY_DW_DJ_zlbh" size="25"></td>
    </tr>
  <tr>
    <td align="center">技防工程部门名称</td>
    <td><input name="CY_DW_DJ_gcmc" type="text" id="CY_DW_DJ_gcmc" size="15"></td>
    <td>办公面积</td>
    <td><input name="CY_DW_DJ_bgmj" type="text" id="CY_DW_DJ_bgmj" size="15"></td>
    <td align="center">人数</td>
    <td><input name="CY_DW_DJ_bgCount" type="text" id="CY_DW_DJ_bgCount" size="15"></td>
  </tr>
  <tr>
    <td align="center">联系地址</td>
    <td><input name="CY_DW_DJ_add1" type="text" id="CY_DW_DJ_add1" size="15"></td>
    <td>负责人</td>
    <td><input name="CY_DW_DJ_master1" type="text" id="CY_DW_DJ_master1" size="15"></td>
    <td align="center">电话</td>
    <td><input name="CY_DW_DJ_phone1" type="text" id="CY_DW_DJ_phone1" size="15"></td>
  </tr>
  <tr>
    <td align="center">工程部门主要合资、合作单位基本情况</td>
    <td colspan="5"><input name="CY_DW_DJ_otherUnit" type="text" id="CY_DW_DJ_otherUnit" size="25"></td>
    </tr>
  <tr align="center">
    <td>申请项目</td>
    <td colspan="5" align="left"><input name="CY_DW_DJ_appPro" type="text" id="CY_DW_DJ_appPro" size="25"></td>
  </tr>
  <tr align="center">
    <td>法定代表人签字</td>
    <td align="left"><input name="CY_DW_DJ_master2" type="text" id="CY_DW_DJ_master2" size="15"></td>
    <td align="left">电话</td>
    <td align="left"><input name="CY_DW_DJ_phone2" type="text" id="CY_DW_DJ_phone2" size="15"></td>
    <td align="left">手机</td>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -