useredit.asp

汽车违法查询系统V0.1版本 1.直接解压上传空间就可使用！ 管理员admin 密码www.aoaoe.com 2.Conn.asp文件为数据库路径

<%if Session.Contents("master")="master" then%>
<!--#include file="conn.asp"-->
<%
dim id
id=Request("id")
If id="" Then
response.write "非法的请求"
Else
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 管理员 where id="+id
rs.Open sql,conn,3,2
%>
<link rel="stylesheet" href="css.css">
<br><br><br><br>
  <table border="1" cellspacing="1" cellpadding="5" align="center" height="10" bordercolor="#7C96B8" bordercolordark="#FFFFFF">
  <form method="post" action="usersave.asp?id=<%=request("id")%>" name="Form1">
  <TR bgcolor="#7C96B8">
    <td height="20" colspan="2"><font color="#FFFFFF">修改用户数据</font></td>
    </TR>
    <tr>
      <td width="80">用户名：</td>
      <td><input name="user" type="text" id="user" value="<%=rs("用户")%> "></td>
    </tr>
    <tr>
      <td>密码：</td>
      <td><input name="pass" type="text" id="pass" value="<%=rs("密码")%> "></td>
    </tr>
    <tr>
      <td>等级：</td>
      <td><select name="level" id="level">
       <option <%if rs("等级")="管理员" then response.write "selected" end if%>>管理员</option>
       <option <%if rs("等级")="录入员" then response.write "selected" end if%>>录入员</option>
        </select></td>
    </tr>
       <tr align="center">
      <td height="16" colspan="2"><input type="submit" name="Submit" value="修改">
          <input type="reset" name="Submit2" value="重置"></td>
    </tr>
	</FORM>
  </table>
<%end if%>
<%
Else
response.redirect "login.asp"
end if%>