📄 admin_mb.asp
字号:
<%
if session("dj")<>"1" then
Response.Write "<BR><BR><BR><BR><center>权限不足，你没有此功能的管理权限"
Response.end
end if
%>
<!--#include file = admin_chk.asp -->
<style>
<!--
a:link { font-size: 9pt; font-family: 宋体; color: #000000;text-decoration: none; }
a:visited { color: #000000; font-family: 宋体; font-size: 9pt;text-decoration: none; }
a:hover { font-size: 9pt; font-family: 宋体; color: #000000;TEXT-DECORATION: underline; }
body { font-family: 宋体; color: #000000; font-size: 9pt }
p { color: #000000; font-family: 宋体; font-size: 9pt }
td { font-size: 9pt; font-family: 宋体; color: #000000 }
input { font-size: 9pt; font-family: 宋体; color: #000000 }
-->
</style>
<!--#include file = admin_conn.asp -->
<body bgcolor="#ffffff">
<div align="center">
<br><a href="admin_mb_add.asp">增加新闻模版</a> <a href="admin_mb_so.asp">搜索模版管理</a> <a href="admin_mb_tg.asp">投稿模版管理</a><br><br>
<table border="1" width="600" id="table1" cellspacing="0" cellpadding="5" style="border-collapse: collapse" bordercolor="#CCCCCC">
<%
sql = "select * from newsmb where lx='1' order by id desc"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
if rs.recordcount<>0 then
for i=0 to rs.recordcount
%>
<tr>
<td bgcolor="#F5F5F5"><%=rs("title")%></td>
<td bgcolor="#F5F5F5" width="269" align="center"><a href="admin_mb_view.asp?id=<%=rs("id")%>" target=_blank>查看</a> <a href="admin_mb_add.asp?id=<%=rs("id")%>&lx=<%=rs("lx")%>">修改</a> <a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="admin_mb_del2.asp?id=<%=rs("id")%>">删除</a></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
else
response.write "<tr><td>还没有记录！</td></tr>"
end if
%>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -