📄 admin_option.asp
字号:
<%@language=vbscript%>
<%if not session("checked")="yes" then
response.Redirect "error.htm"
else
%>
<!--#include file="conn1.asp"-->
<%
set adm=server.createobject("adodb.recordset")
sq_1="select * from admin order by id desc"
adm.open sq_1,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员设置</title>
<style type="text/css">
<!--
body,td,th {font-size: 12px;}
a {font-size: 12px;}
a:link {text-decoration: none;}
a:visited {text-decoration: none;}
a:hover {text-decoration: none;}
a:active {text-decoration: none;}
.style5 {color: #FF0000}
.style6 {font-size: 12px}
-->
</style>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" text="#25437C" link="#25437C" alink="#25437C" vlink="#25437C">
<div align="center">
<p> </p>
<table cellpadding="0" cellspacing="0" width="156" height="12">
<tr>
<td width="156" height="12" style="font-size: 12px">
<p align="center"><b>管理员设置</b></td>
</tr>
</table>
</div>
<div align="center">
<table cellpadding="0" cellspacing="0" width="768" height="97">
<tr>
<td height="10" valign="top" width="10" style="font-size: 12px">
<img border="0" src="image/top_left.gif" width="10" height="10"></td>
<td height="10" valign="top" width="748" background="image/top.gif" style="font-size: 12px">
</td>
<td height="10" valign="top" width="10" style="font-size: 12px">
<img border="0" src="image/top_right.gif" width="10" height="10"></td>
</tr>
<tr>
<td height="77" valign="top" width="10" background="image/mid_left.gif" style="font-size: 12px">
</td>
<td height="77" valign="top" width="748" bgcolor="#F3F3FF" style="font-size: 12px">
<p align="center">[<a href="add_admin.asp">添加管理员</a>]
[<a href="admin.asp">回上一页</a>]</p>
<p align="center">请保留至少一位管理员</p>
<div align="center">
<table cellpadding="0" cellspacing="0" width="383" height="126">
<tr>
<td height="12" valign="top">现有管理员:</td>
</tr>
<tr>
<td height="114" valign="top">
<div align="center">
<%do while not adm.eof %>
<table cellpadding="0" cellspacing="0" width="305" height="12">
<tr>
<td height="12" width="86"><%=adm("admin")%></td>
<td height="12" width="142">
+---------------------></td>
<td height="12" width="53"> <a href="mod_admin.asp?id=<%=adm("id")%>">修改</a> </td>
<td height="12" width="24"><a href="del_admin.asp?id=<%=adm("id")%>" onClick="return confirm('要删除它吗？')">删除</td>
</tr>
</table><br>
<%
adm.movenext
loop %>
</div>
</td>
</tr>
</table>
</div>
<p> </td>
<td height="77" valign="top" width="10" background="image/mid_right.gif" style="font-size: 12px">
</td>
</tr>
<tr>
<td height="10" valign="top" width="10" style="font-size: 12px">
<img border="0" src="image/bottom_left.gif" width="10" height="10"></td>
<td height="10" valign="top" width="748" background="image/bottom.gif" style="font-size: 12px">
</td>
<td height="10" valign="top" width="10" style="font-size: 12px">
<img border="0" src="image/bottom_right.gif" width="10" height="10"></td>
</tr>
</table>
</div>
<div align="center">
<table cellpadding="0" cellspacing="0" width="348" height="87">
<!-- MSTableType="nolayout" --><tr>
<td height="12" valign="top" width="348" colspan="3" style="font-size: 12px"></td>
</tr>
<tr>
<td height="63" valign="top" width="48" style="font-size: 12px"> </td>
<td height="63" valign="top" width="251" style="font-size: 12px">
<p align="center"><font face="宋体" size="2">倾听留言本V1.2<br></font>留言本及源程序由
<span lang="en"><font face="宋体" size="2" color="#FF0000">
<a href="QQ:55572687"><font color="#FF0000">冰中使者</font></a></font><a href="QQ:55572687"><font face="宋体" color="#FF0000" size="3">®</font></a><font face="宋体" size="4" color="#FF0000">
</font><font face="宋体" size="2">制作<br></font></span>
<font face="宋体" size="2">
[<a target="_blank" href="http://www.qtice.com">http://www.qtice.com</a>]<br> </font></td>
<td height="63" valign="top" width="49" style="font-size: 12px"> </td>
</tr>
<tr>
<td height="12" valign="top" width="348" colspan="3" style="font-size: 12px"></td>
</tr>
</table></div>
</body>
</html>
<%adm.close
set adm=nothing
conn.close
set conn=nothing
%>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -