toubaosave.asp

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

<!--#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")
   set rs=server.CreateObject("adodb.recordset")
      sql="select * from car_toubao"
	  rs.open sql,conn,3,3
	  rs.addnew
	  rs("序号")=aa
	  rs("承租人")=bb
	  rs("车牌号")=cc
	  rs("保险日期")=dd
	  rs("保险日期1")=ee
	  rs("第三者责任险")=ff
	  rs("司乘人员险")=gg
	  rs("车损险")=hh
	  rs("备注")=ii
	  rs("单位")=jj
     rs.update
	 response.redirect("addcartoubao.asp")
	   rs.close
	 set rs=nothing
	 conn.close
	 set conn=nothing
	  %>