⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 drrivemodfiy1.asp

📁 20041230162250801409: 浙江省丽水市公铁联运有限公司OA系统(物流) 开发语言:PHP/ASP/PERL 本系统包括各个部门的管理
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="conn.asp"-->
<%
if session("pwd")<>"pass" then 
 response.Redirect "../hcy/login.asp"
  response.end 
 end if 
  %>
<%
id=request.querystring("id")
'BiaoHao=Request("BiaoHao")
set rs=server.createobject("adodb.recordset")
sqltext="select * from driver1 where id="& id
rs.open sqltext,conn,1,1

%>
<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>
<table width="290" align="center" cellpadding="0" cellspacing="0" class="TOOLBARTABLE">
  <tr>
    <td background="../image/titlebg.gif"> 
      <div align="center">聘用驾驶员信息修改</div></td>
  </tr>
</table>
<table width="290" align="center" class="TOOLBARTABLE">
  <tr> 
    <td width="306"><FORM language=javascript name=FORM1   action="driver_ok1.asp?Id=<%=Id%>" method=post >
        <table width="276" border="0" align="center" cellpadding="0" cellspacing="0"  class="TOOLBARTABLE">
          <tr> 
            <td><font color="#000000">编号:</font></td>
            <td><input name="aa1" type="text" class="input_plane2" id="aa1"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%=rs("编号")%>"></td>
          </tr>
          <tr> 
            <td><font color="#000000">聘用驾驶员名字: </font></td>
            <td><input name="aa" type="text" class="input_plane2" id="aa"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("聘用驾驶员") %>"></td>
          </tr>
          <tr> 
            <td width="99"><font color="#000000">性 别:</font></td>
            <td width="171"><select name="bb" id="bb">
                <option value="男性" <%If (Not isNull(rs("性别"))) Then If ("男性" = CStr(rs("性别"))) Then Response.Write("SELECTED") : Response.Write("")%>>男性</option>
                <option value="女性" <%If (Not isNull(rs("性别"))) Then If ("女性" = CStr(rs("性别"))) Then Response.Write("SELECTED") : Response.Write("")%>>女性</option>
              </select></td>
          </tr>
          <tr> 
            <td><font color="#000000">出生年月:</font></td>
            <td><input name="cc" type="text" class="input_plane2" id="cc"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("出生年月") %>"></td>
          </tr>
          <tr> 
            <td><font color="#000000">家庭地址:</font></td>
            <td><input name="dd" type="text" class="input_plane2" id="dd"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("家庭地址") %>"></td>
          </tr>
          <tr> 
            <td><font color="#000000">上岗证号码:</font></td>
            <td><input name="ee" type="text" class="input_plane2" id="ee"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("现住地址") %>"></td>
          </tr>
          <tr> 
            <td><font color="#000000">驾驶证号码:</font></td>
            <td><input name="ff" type="text" class="input_plane2" id="ff"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("驾驶证号码") %>"></td>
          </tr>
          <tr> 
            <td><font color="#000000">驾驶车类:</font></td>
            <td><select name="gg" id="gg">
                <option value="请选择驾驶车类" selected <%If (Not isNull(rs("驾驶车类"))) Then If ("请选择驾驶车类" = CStr(rs("驾驶车类"))) Then Response.Write("SELECTED") : Response.Write("")%>>请选择驾驶车类</option>
                <option value="A类车" <%If (Not isNull(rs("驾驶车类"))) Then If ("A类车" = CStr(rs("驾驶车类"))) Then Response.Write("SELECTED") : Response.Write("")%>>A类车</option>
                <option value="B类车" <%If (Not isNull(rs("驾驶车类"))) Then If ("B类车" = CStr(rs("驾驶车类"))) Then Response.Write("SELECTED") : Response.Write("")%>>B类车</option>
                <option value="C类车" <%If (Not isNull(rs("驾驶车类"))) Then If ("C类车" = CStr(rs("驾驶车类"))) Then Response.Write("SELECTED") : Response.Write("")%>>C类车</option>
              </select></td>
          </tr>
          <tr> 
            <td><font color="#000000">联系号码:</font></td>
            <td><input name="hh" type="text" class="input_plane2" id="hh"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#ffffff'" value="<%= rs("联系号码") %>"></td>
          </tr>
        </table>
        <p>&nbsp;</p>
        <table width="280" align="center">
          <tr> 
            <td width="336"><div align="center"> 
                <input name="Submit" type="submit" class="button"  onmouseover="this.style.backgroundColor='#e1f4ee'" onmouseout="this.style.backgroundColor='#cccccc'" value="确 定 修 改">
              </div></td>
          </tr>
        </table>
      </form></td>
  </tr>
</table>
<% rs.close
   set rs=nothing
   conn.close
   set conn=nothing
   %>
</body>
</html>

⌨️ 快捷键说明

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