yinyun_ok.asp

20041230162250801409： 浙江省丽水市公铁联运有限公司OA系统（物流） 开发语言：PHP/ASP/PERL 本系统包括各个部门的管理

<%@ language="vbscript"%>
<%response.Expires = 0%>

<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from yinyun  where id=" & request.Querystring("id")
rs.open sqltext,conn,3,3

'更新记录到数据库
rs("编号")=request.form("aa")
rs("经营者")=request.form("bb")
if request("cc")="" then
  rs("车牌号")="无"
  else
  rs("车牌号")=request("cc")
  end if 
'rs("车牌号")=request.form("cc")
rs("车型")=request.form("ee")
rs("吨位")=request.form("ff")
If Request("gg")="" Then
			rs("联系号码")="无"
		Else
			rs("联系号码")=Request("gg")
	End If
	
	 If Request("hh")="" Then
			rs("合同期限")="无"
		Else
			rs("合同期限")=Request("hh")
	End If
	If Request("ii")="" Then
			rs("合同期限1")=null
		Else
			rs("合同期限1")=Request("ii")
	End If
	If Request("jj")="" Then
			rs("保险期限")="无"
		Else
			rs("保险期限")=Request("jj")
	End If

	 If Request("kk")="" Then
			rs("燃油种类")=null
		Else
			rs("燃油种类")=Request("kk")
	End If
	 rs("性别")=request("sex")
	 If Request("mm")="" Then
			rs("身份证号码")=null
		Else
			rs("身份证号码")=Request("mm")
	End If
	 If Request("pp")="" Then
			rs("家庭地址")=null
		Else
			rs("家庭地址")=Request("pp")
	End If
	 If Request("nn")="" Then
			rs("现住地址")=null
		Else
			rs("现住地址")=Request("nn")
	End If
	 If Request("oo")="" Then
			rs("颜色")=null
		Else
			rs("颜色")=Request("oo")
	End If
	 If Request("qq")="" Then
			rs("制造厂家")=null
		Else
			rs("制造厂家")=Request("qq")
	End If
	 If Request("rr")="" Then
			rs("发动机号码")=null
		Else
			rs("发动机号码")=Request("rr")
	End If
	 If Request("ss")="" Then
			rs("车架号")=null
		Else
			rs("车架号")=Request("ss")
	End If
	 If Request("tt")="" Then
			rs("轴数")=null
		Else
			rs("轴数")=Request("tt")
	End If
	 If Request("uu")="" Then
			rs("轴距")=null
		Else
			rs("轴距")=Request("uu")
	End If
	If Request("vv")="" Then
			rs("驾驶室载客")=null
		Else
			rs("驾驶室载客")=Request("vv")
	End If
    if request("bb72")="" then 
	rs("投产时间年")=null 
	else
	  rs("投产时间年")=request("bb72")
	  end if 
	
	 rs("投产时间月")=request.form("time1")
	 rs("投产时间日")=request.form("time2")
	 if request("time3")="" then 
	 rs("保险期限年")=null
	   else
	   rs("保险期限年")=request("time3")
	   end if 
	 'rs("保险期限年")=request.form("time3")
	 rs("保险期限月")=request.form("time4")
	 rs("保险期限日")=request.form("time5")
	 if request("time6")="" then 
	 rs("保险期限年1")=null
	   else
	   rs("保险期限年1")=request("time6")
	   end if 
	' rs("保险期限年1")=request.form("time6")
	 rs("保险期限月1")=request.form("time7")
	 rs("保险期限日1")=request.form("time8")
	 if request("oo2")="" then 
	    rs("other")="其它险种" 
		else
		rs("other")=request("oo2")
		end if 
		if request("aa42")="" then 
	    rs("other1")=null
		else
		rs("other1")=request("aa42")
		end if
		if request("aa43")="" then 
	    rs("other2")=null
		else
		rs("other2")=request("aa43")
		end if
	 If Request("yy")="" Then
			rs("保额车损险")=null
		Else
			rs("保额车损险")=Request("yy")
	End If
If Request("zz")="" Then
			rs("保额第三责任险")=null
		Else
			rs("保额第三责任险")=Request("zz")
	End If
	If Request("aa1")="" Then
			rs("保额司乘人员险")=null
		Else
			rs("保额司乘人员险")=Request("aa1")
	End If
	 If Request("aa2")="" Then
			rs("保额货物承责险")=null
		Else
			rs("保额货物承责险")=Request("aa2")
	End If
	 If Request("aa3")="" Then
			rs("保额货物公定险")=null
		Else
			rs("保额货物公定险")=Request("aa3")
	End If 
	 If Request("aa4")="" Then
			rs("保额不计免赔")=null
		Else
			rs("保额不计免赔")=Request("aa4")
	End If 
If Request("aa5")="" Then
			rs("保费车损险")=null
		Else
			rs("保费车损险")=Request("aa5")
	End If 
	If Request("aa6")="" Then
			rs("保费第三责任险")=null
		Else
			rs("保费第三责任险")=Request("aa6")
	End If 
	If Request("aa7")="" Then
			rs("保费司乘人员险")=null
		Else
			rs("保费司乘人员险")=Request("aa7")
	End If
	 If Request("aa8")="" Then
			rs("保费货物承责险")=null
		Else
			rs("保费货物承责险")=Request("aa8")
	End If
	 If Request("aa9")="" Then
			rs("保费货物公定险")=null
		Else
			rs("保费货物公定险")=Request("aa9")
	End If
	 If Request("aa10")="" Then
			rs("保费不计免赔")=null
		Else
			rs("保费不计免赔")=Request("aa10")
	End If
	  If Request("bb2")="" Then
			rs("安全记录")="没有信息,该驾驶员驾驶情况良好！！"
		Else
			rs("安全记录")=Request("bb2")
	End If
	 If Request("bb1")="" Then
			rs("备注")=null
		Else
			rs("备注")=Request("bb1")
	End If
	If Request("ww")="" Then
			rs("承保单位")=null
		Else
			rs("承保单位")=Request("ww")
	End If
	If Request("xx")="" Then
			rs("保单号")=null
		Else
			rs("保单号")=Request("xx")
	End If
	 
	  rs("日期年2")=request.form("bb3") 
	 rs("日期月2")=request.form("bb4")
	  rs("日期日2")=request.form("bb5")
	 If Request("bb6")="" Then
			rs("日期时")=null
		Else
			rs("日期时")=Request("bb6")
	End If
	 If Request("bb7")="" Then
			rs("编号2")=null
		Else
			rs("编号2")=Request("bb7")
	End If
If Request("bb8")="" Then
			rs("驾驶员")=null
		Else
			rs("驾驶员")=Request("bb8")
	End If
      If Request("bb9")="" Then
			rs("责任")=null
		Else
			rs("责任")=Request("bb9")
	End If
	 If Request("cc3")="" Then
			rs("事故简况")=null
		Else
			rs("事故简况")=Request("cc3")
	End If
	 If Request("bb10")="" Then
			rs("处理部门")=null
		Else
			rs("处理部门")=Request("bb10")
	End If
If Request("cc1")="" Then
			rs("经办人")=null
		Else
			rs("经办人")=Request("cc1")
	End If
If Request("cc4")="" Then
			rs("车物损失情况")=null
		Else
			rs("车物损失情况")=Request("cc4")
	End If
If Request("cc5")="" Then
			rs("工时费")=null
		Else
			rs("工时费")=Request("cc5")
	End If
If Request("cc6")="" Then
			rs("材料费")=null
		Else
			rs("材料费")=Request("cc6")
	End If
If Request("cc7")="" Then
			rs("送赔时间")=null
		Else
			rs("送赔时间")=Request("cc7")
	End If
	 If Request("cc8")="" Then
			rs("送赔金额")=null
		Else
			rs("送赔金额")=Request("cc8")
	End If
		 If Request("dd3")="" Then
			rs("对方赔付")=null
		Else
			rs("对方赔付")=Request("dd3")
	End If
		 If Request("cc9")="" Then
			rs("事故损失差额")=null
		Else
			rs("事故损失差额")=Request("cc9")
	End If
	 If Request("cc10")="" Then
			rs("赔回时间")=null
		Else
			rs("赔回时间")=Request("cc10")
	End If
 If Request("dd1")="" Then
			rs("赔回金额")=null
		Else
			rs("赔回金额")=Request("dd1")
	End If
 If Request("dd2")="" Then
			rs("索赔部门")=null
		Else
			rs("索赔部门")=Request("dd2")
	End If
If Request("dd4")="" Then
			rs("待岗或解聘")=null
		Else
			rs("待岗或解聘")=Request("dd4")
	End If
If Request("dd7")="" Then
			rs("罚款")=null
		Else
			rs("罚款")=Request("dd7")
	End If
If Request("dd6")="" Then
			rs("合计")=null
		Else
			rs("合计")=Request("dd6")
	End If	
	If Request("dd5")="" Then
			rs("承担经济损失")=null
		Else
			rs("承担经济损失")=Request("dd5")
	End If
	If Request("dd8")="" Then
			rs("执行时间")=null
		Else
			rs("执行时间")=Request("dd8")
	End If
If Request("dd9")="" Then
			rs("备注2")=null
		Else
			rs("备注2")=Request("dd9")
	End If
If Request("jj2")="" Then
			rs("车辆类型")=null
		Else
			rs("车辆类型")=Request("jj2")
	End If


'rs("bei_zhu")=request.form("gg") 
rs.update
rs.close
conn.close
%>
<html>
<head><link href="../appmain.css" rel="stylesheet" type="text/css">

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改页面</title>
</head>

<body>
<p>&nbsp;</p>
<table width="60%" border="0" align="center" cellpadding="0" cellspacing="0" class="FORMTABLE">
  <tr> 
    <td colspan="2" bgcolor="#CCCCCC"> <div align="center"><font color="#FF0000">系统提示：修改成功！请选择返回页面..</font></div></td>
  </tr>
  <tr> 
    <td width="48%" rowspan="4"><div align="center"></div>
      <div align="center"><img src="../huoyun/image/do_ok.gif" width="120" height="114"></div></td>
    <td width="52%" height="54">请选择：</td>
  </tr>
  <tr> 
    <td>返回：<font color="#FF0000"><a href="../user/user.asp" target="_parent">营运车辆基本简况</a></font>页面</td>
  </tr>
  <tr> 
    <td>进入：<font color="#FF0000"><a href="../add/addaccsident1.asp" target="_parent">人员受伤登记</a></font>页面</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
</body>
</html>