?? admin.asp
字號:
<!--#include file="../conn2.asp"-->
<!--#include file="../inc/config.asp"-->
<!--#include file="set.asp"-->
<%Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM shop_user where manbid>0"
rs.open sql, conn, 1, 3
%><head>
<LINK
href="css.css" type=text/css rel=stylesheet>
<style type="text/css">
<!--
.style1 {color: #000000}
-->
</style>
</head>
<body>
<p align="center"><br>
<div align="center">
<center>
<table width="90%" border="0" align="center" cellpadding="2" cellspacing="1" bordercolordark="#FFFFFF" bgcolor="#CCCCCC">
<tr bgcolor="f1f1f1">
<td height="25" colspan="4" class="norightbuttonborder2"><div align="center" class="style1">社區版主管理 <a href="add_admin.asp">添加管理員</a></div></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="48%" height="25"> <p align="center"><b>用戶名</b></p></td>
<td width="24%" height="25"> <p align="center"><b>管理論壇</b></td>
<td height="25" colspan="2"> <p align="center"><b>操作</b></td>
</tr>
<%do while not rs.eof%>
<tr bgcolor="#FFFFFF">
<td width="48%" height="25"> <p align="center"><%if session("username")=rs("username") then%><font color=red><%=rs("username")%></font><%else%><%=rs("username")%><%end if%> </p></td>
<td width="24%" height="25"> <p align="center">
<%if rs("manbid")=20000 then
response.write"論壇管理員"
else
set bidreco=server.createobject("adodb.recordset")
sqlstr="select * from board where bid="&rs("manbid")&""
bidreco.open sqlstr,conn,1,1
%>
<%=bidreco("bidname")%>
<%end if%>
</p></td>
<td width="14%" height="25"> <p align="center"><%if session("username")=rs("username") then%>修改<%else%><a href="add_admin.asp?username=<%=rs("username")%>">修改</a><%end if%></td>
<td width="14%" height="25"> <p align="center"><%if session("username")=rs("username") then%>刪除<%else%><a href="#" onclick="if(confirm('真的要刪除嗎?')){window.location.href='add_admin.asp?id=<%=rs("userid")%>&menu=del'}"> <strong>刪除</strong></a><%end if%></td>
</tr>
<%rs.movenext
loop%>
</table>
</center>
</div>
</body>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -