driver_ok.asp

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

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

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

'更新记录到数据库
If Request("aa1")="" Then
			rs("编号")=null
		Else
			rs("编号")=Request("aa1")
	End If
    If Request("aa")="" Then
			rs("聘用驾驶员")=null
		Else
			rs("聘用驾驶员")=Request("aa")
	End If
	  rs("性别")=request.form("bb")
	
	If Request("cc")="" Then
			rs("出生年月")="无"
		Else
			rs("出生年月")=Request("cc")
	End If
	
	 If Request("dd")="" Then
			rs("家庭地址")="无"
		Else
			rs("家庭地址")=Request("dd")
	End If 
	If Request("ee")="" Then
			rs("现住地址")="无"
		Else
			rs("现住地址")=Request("ee")
	End If 
	If Request("ff")="" Then
			rs("驾驶证号码")="无"
		Else
			rs("驾驶证号码")=Request("ff")
	End If 
	If Request("gg")="" Then
			rs("驾驶车类")="无"
		Else
			rs("驾驶车类")=Request("gg")
	End If 
	If Request("hh")="" Then
			rs("联系号码")="无"
		Else
			rs("联系号码")=Request("hh")
	End If 
rs.update
rs.close
'conn.close
response.redirect "../yinyun/yinyun.asp"
 rs.close
   set rs=nothing
   conn.close
   set conn=nothing
  
%>