gusucode.com > 学校共青团组织网站源代码 > 学校共青团组织网站源代码/626/admin/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>