📄 admin_admin.asp

📁 没有什么
💻 ASP
字号:
<!--#include file="Const.Asp"-->
<%CheckAdmin3%>

<link href="Images/Admin_Style.Css" rel="stylesheet" type="text/css">
<table border="0" width="100%" cellspacing="0" cellpadding="5">
  <tr>
    <td align=center valign=top>
      <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
          <tr class="title">
            <td width="100%" height="22" colspan=7 align=center>管 理 员 列 表</td>
        </tr>
        <tr>
          <td width="25%" class=tdbg align="center" height="22">管理员名</td>
          <td width="20%" class=tdbg align="center">权限</td>
          <td width="10%" class=tdbg align="center">修改</td>
          <td width="10%" class=tdbg align="center">删除</td>
        </tr>
<%
set rs=server.CreateObject("ADODB.RecordSet")
	  
sql="select * from admin"
rs.open sql,conn,1
%> 
<%
if rs.EOF then
%>
        <tr><td colspan=5 align=center>没有用户：（</td></tr>
<%
else
	do while NOT rs.EOF
if rs("oskey")="super" then oskey="高级管理员"
if rs("oskey")="check" then oskey="中级管理员"
if rs("oskey")="input" then oskey="初级管理员"
%> 
        <tr> 
          <td width="25%" class=tdbg align="center" height="19"><%=rs("Username")%></td>
          <td width="20%" class=tdbg align="center"><%=oskey%>　</td>
          <td width="10%" class=tdbg align="center"><a href="Admin_Admin_Edit.Asp?id=<%=rs("id")%>">修改</a></td>
          <td width="10%" class=tdbg align="center"><a href="Admin_Admin_Data.Asp?id=<%=rs("id")%>">删除</a></td>
        </tr>
<%
	rs.MoveNext
	loop
end if
rs.close
%> 
      </table>
      <FORM METHOD=POST ACTION="Admin_Admin_Err.asp" id=form1 name=form1>
        <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
          <tr class="title"> 
            <td height="22" colspan="3" align="center">添 加 管 理 员</td>
          </tr>
          <tr>
            <td class=tdbg align="right">管 理 员 名：</td>
            <td class=tdbg><input class=input  type=text name=UserName size="15"  value="" onfocus=this.select() onmouseover=this.focus() name=keyword size=14 maxlength="30"></td>
          </tr>
          <tr> 
            <td class=tdbg align="right">管 理 权 限：</td>
            <td class=tdbg>
              <select class=input name="oskey">
                <option value=super selected>高级管理员</option>
                <option value=check>中级管理员</option>
                <option value=input>初级管理员</option>
              </select>
            </td>
          </tr>
          <tr> 
            <td class=tdbg align="right">管 理 密 码：</td>
            <td class=tdbg><input class=input  type=text name=Password size="15"  value="" onfocus=this.select() onmouseover=this.focus() name=keyword size=14 maxlength="30"></td>
          </tr>
          <tr> 
            <td class=tdbg align="center" colspan=2> 
             <input class=input  type=hidden value="add" name="act">
             <input class=input  type=submit value=增加 name="submit">
             <input class=input  type=reset name="Submit" value="取消">
            </td>
          </tr>
        </table>
      </FORM>
    </td>
  </tr>
</table>
</div>
<%
set rs=nothing
conn.close
set conn=nothing
%></body></html>
<html></html>
⌨️ 快捷键说明

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