accsident1save.asp

来自「20041230162250801409： 浙江省丽水市公铁联运有限公司OA系」· ASP 代码 · 共 82 行

ASP
82 行
字号 
<!--#include file="conn.asp"-->
<%   aa1=request.form("aa1")
    aa=request.Form("aa")
	bb=request.Form("bb")
	cc=request.Form("cc")
	dd=request.Form("dd")
	ee=request.Form("ee")
	ff=request.Form("ff")
	gg=request.Form("gg")
	hh=request.Form("hh")
	set rs=server.CreateObject("adodb.recordset")
	 sql="select * from accsident1"
	  rs.open sql,conn,3,3
	  rs.addnew
	  rs("编号")=aa1
	 if request("aa")="" then 
	 rs("姓名")=null
	 else 
	 rs("姓名")=request("aa")
	 end if 
	 if request("bb")="请选择性别" then
	   rs("性别")=null
	   else
	   rs("性别")=request("bb")
	   end if 
	   if request("cc")="请选择年龄" then
	   rs("年龄")=null
	   else
	   rs("年龄")=request("cc")
	   end if 
       if request("dd")="" then 
	   rs("职业")=null
	   else
	   rs("职业")=request("dd")
	   end if 
       if request("ee")="" then
	   rs("住址")=null
	   else
	   rs("住址")=request("ee")
	   end if 
         if request("ff")="请选择" then 
		 rs("伤势")=null
		 else
		 rs("伤势")=request("ff")
		 end if 
    if request("gg")="" then 
	rs("家属姓名")=null
	else
	rs("家属姓名")=request("gg")
	end if 
     if request("hh")="" then 
	 rs("结案时间")=null
	 else
	 rs("结案时间")=request("hh")
	 end if 

      rs.update
	  rs.close

set rs=nothing
conn.close
set conn=nothing
	  %>
<html>
<head>
<link href="../main.css" rel="stylesheet" type="text/css">
<meta http-equiv="refresh" content="5;URL=../user/user.asp">
<title>添加成功</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>

<body bgcolor="#e1f4ee">
<table width="395" border="1" align="center" cellpadding="0" cellspacing="0" bordercolordark="#ffffff" bordercolorlight="#000000">
  <tr> 
    <td width="391" height="15"><font color="#000000">你已成功添加了位受伤人员,如需继续添加，请单击<a href="addaccsident1.asp">--<font color="#FF0000" size="4">继续添加</font></a></font></td>
  </tr>
  <tr> 
    <td><font color="#000000">如果添加完成,系统5秒钟后将自动返回</font><font color="#FF0000">营运车辆基本情况页面</font></td>
  </tr>
</table>
</body>
</html>

accsident1save.asp - 源码说明

本页面展示了「20041230162250801409： 浙江省丽水市公铁联运有限公司OA系统（物流） 开发语言：PHP/ASP/PERL 本系统包括各个部门的管理」中的 accsident1save.asp 源码文件，采用 ASP 编程语言编写，共 82 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与OA系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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