📄 admin_bbsclaman.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=2
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="admin_Function.asp" -->
<%
dim bbsclass,action
bbsclass=trim(request("bbsclass"))
action=trim(request("action"))
if bbsclass<>"" and action="del" then
dim sql,sql1,sql2
sql="delete * from bbsclass where bbsclass='"&bbsclass&"'"
conn.execute sql
sql1="delete * from userbook where bbsclass='"&bbsclass&"'"
conn.execute sql1
sql2="delete * from reuserbook where bbsclass='"&bbsclass&"'"
conn.execute sql2
end if
%>
<%
dim rs,errmsg
set rs=server.createobject("Adodb.Recordset")
rs.open"select * from bbsclass order by bbsid desc",conn,1,1
if rs.bof or rs.eof then
errmsg=errmsg + "<br><br><li>还没有栏目可以管理！</li>"
errmsg=errmsg + "<br><br><li>请添加新栏目：［<a href='admin_BbsClaAdd.asp'>添加新栏目</a>］</li>"
errmsg=errmsg + "<br><br>"
call closeconn()
call ShowErrMsg()
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script language=javascript>
function checkdel()
{
if(confirm("你确定要删除该栏目吗？一旦删除，该栏目下的主题及回复都将删除，不能再恢复！"))
return true;
else
return false;
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="txt1">欢迎来到BBS栏目管理面板</td>
</tr>
<tr>
<td align="center" class="txt05">［<a href="admin_BbsClaAdd.asp">添加栏目</a>]［<a href="admin_BbsManage.asp">主题管理</a>］</td>
</tr>
<tr>
<td><table width="99%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="F5F8F5" class="border">
<tr align="center" class="txt1">
<td width="6%" class="tbbgtitle">编号</td>
<td width="12%" class="tbbgtitle">栏目名称</td>
<td width="12%" class="tbbgtitle">栏目简介</td>
<td width="18%" class="tbbgtitle">栏目图片</td>
<td width="15%" class="tbbgtitle">栏目管理员</td>
<td width="11%" class="tbbgtitle">添加时间</td>
<td width="9%" class="tbbgtitle">是否锁定</td>
<td width="17%" class="tbbgtitle">操作</td>
</tr><%do while not rs.eof%>
<tr align="center" class="txt05">
<td><%=rs("bbsid")%></td>
<td><%=rs("bbsclass")%></td>
<td><%=rs("bbstext")%></td>
<td><img src="../<%=rs("bbsimg")%>" height="60" width="80"></img></td>
<td><%=rs("bbsadmin")%></td>
<td><%=rs("bbsupdate")%></td>
<td><%if rs("islock")=true then%><span class="txt06">已锁定</span><%else%>未锁定<%end if%></td>
<td><a href="admin_BbsClaMod.asp?bbsid=<%=rs("bbsid")%>">修改</a> | <a href="admin_BbsClaMan.asp?bbsclass=<%=rs("bbsclass")%>&action=del" onclick="return checkdel();">删除
<input name="action" type="hidden" id="action" value="del">
</a></td>
</tr>
<%rs.movenext
loop
rs.close
set rs=nothing
%>
</table></td>
</tr>
</table>
</body>
</html>
<%
end if
call closeconn()
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -