huowu_save.asp

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

<!--#include file="../conn.asp"-->
<% 
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")
ii=request.form("ii")
jj=request.form("jj")
kk=request.form("kk")
ll=request.form("ll")
mm=request.form("mm")
nn=request.form("nn")  
oo=request.form("oo")
pp=request.form("pp")
qq=request.form("qq")
rr=request.form("rr")
  set rs=server.CreateObject("adodb.recordset")
   sql="select * from  h_huoyun"
   rs open sql,conn,1,1
 rs.addnew
  rs("h_year")=aa
  rs("h_month")=bb
  rs("h_date")=cc
 if request("dd")="" then 
     rs("h_number")=null
	 else
	 rs("h_number")=request("dd")
	 end if 
	 if request("ee")="" then 
	 rs("h_name")=null
	 else
	 rs("h_name")=request("ee")
	 end if
	 if request("ff")="" then 
	 rs("h_send")=null
	 else
	 rs("h_send")=request("ff")
	 end if 
	 if request("gg")="" then 
	 rs("resive")=null
	 else
	 rs("resive")=request("gg")
	 end if 
	 if request("hh")="" then 
	 rs("h_num")=null
	 else
	 rs("h_num")=request("hh")
	 end if 
	 if request("ii")="" then 
	 rs("h_price")=null
	 else
	 rs("h_price")=request("ii")
	 end if 
	 if request("jj")="" then 
	 rs("car")=null
	 else
	 rs("car")=request("jj")
	 end if 
	 if request("kk")="" then 
	 rs("h_lindan")=null
	 else
	 rs("h_lindan")=request("kk")
	 end if 
	 if request("ll")="" then 
	 rs("kuaiyun")=null
	 else
	 rs("kuaiyun")=request("ll")
	 end if
	  if request("mm")="" then 
	  rs("h_time")=null
	  else 
	  rs("h_time")=request("mm")
	  end if 
	  if request("nn")="" then
	  rs("h_number1")=null
	  else
	  rs("h_number1")=request("nn")
	  end if 
	  if request("oo")="" then 
	  rs("h_box")=null
	  else
	  rs("h_box")=request("oo")
	  end if 
	  if request("pp")="" then
	  rs("h_boxnum")=null
	  else
	  rs("h_boxnum")=request("pp")
	  end if 
	  if request("rr")="" then 
	  rs("h_yunhao")=null
	  else
	  rs("h_yunhao")=request("rr")
	  end if 
	  rs.update
	  rs.close
	  set rs=nothing
	  conn.close
	  set conn=nothing
	  
   %>