📄 editadmin.asp

📁 该系统实现居域网网络考试和,系统平分轻松实现

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->

<%
dim key
key=request.querystring("key")
if key<>"" then
set rs=server.createobject("adodb.recordset")
cmd="select * from admin where username like '"&key&"'"
rs.open cmd,conn,1,3

session("myuser")=key

else
response.Write("<script>alert('请选择管理员');window.location.href('Manageadmin.asp')</script>")
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
.style1 {font-size: 14px}
.style2 {font-size: 10px}
body {
	background-color: #0099cc;
}
-->
</style>
</head>

<body>
<form name="form1" method="post" action="updataadmin.asp">
  <table width="366" height="108" border="0" align="center">
    <tr>
      <td width="69">&nbsp;</td>
      <td width="242">&nbsp;</td>
      <td width="41">&nbsp;</td>
    </tr>
    <tr>
      <td><span class="style1">管理帐号:</span></td>
      <td><input name="admin" type="text" disabled="disabled" id="admin" value="<%=rs("username")%>"></td>
      <td>&nbsp;</td>
    </tr>
    <tr>
      <td><span class="style1">管理密码:</span></td>
      <td><input name="psw" type="password" id="psw">
        <span class="style2">不修改请留空</span></td>
      <td>&nbsp;</td>
    </tr>
    <tr>
      <td><span class="style1">管理权限:</span></td>
      <td><input type="radio" name="quanxian" value="1">
        <span class="style1">管理员</span>          <input name="quanxian" type="radio" value="2" checked>
        <span class="style1">教师</span></td>
      <td>&nbsp;</td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td><input type="submit" name="Submit" value="修改">
      <input type="reset" name="Submit2" value="取消"></td>
      <td>&nbsp;</td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td>&nbsp;          </td>
      <td>&nbsp;</td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -