📄 news_admin.asp
字号:
<!--#include file="../inc/CheckAdmin.asp"-->
<!--#include file="../inc/Config.asp"-->
<!--#include file="../inc/Navtree.asp"-->
<!--#include file="../inc/Conn.asp"-->
<!--#include file="setting.asp"-->
<%
Dim Language,table,Sortid,sql
Language=formatStr(Request("Language"))
if Language="" then Language="C"
table_behind="NewsSort_"
table=Get_Table(table_behind,Language)
Sortid=request("Sortid")
KeyWord=formatStr(request("KeyWord"))
if Sortid="" or not isnumeric(Sortid) then
SortSql=""
else
SortSql=" and N_Sortid="&Sortid
end if
sql="select * from News where N_Language like '%"&Language&"%'"&SortSql&" and N_Name like '%"&KeyWord&"%' order by N_Order DESC"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs.pagesize=20
%>
<!--#include file="../../inc/Page_function.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网站管理系统</title>
<link href="../Css_Main.css" rel="stylesheet" type="text/css">
</head>
<script language="JavaScript">
<!--
function CheckAll(formall)
{
for (var i=0;i<formall.elements.length;i++)
{
var e = formall.elements[i];
if (e.name == 'delid')
e.checked = formall.chkall.checked;
}
}
-->
</script>
<body>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr>
<td class="title_dh"><div align="center">新闻管理</div></td>
</tr>
<form action="" method="get" name="form">
<tr>
<td class="tdbg"><div align="left"><strong>搜索：</strong>
<!--#include file="../inc/Language.asp"-->
<select name="Sortid" id="Sortid">
<% If table<>"None" Then %>
<option value="">全部新闻</option>
<%showtreefornav table,"NS_",0,"rs","",SortId,isadd %>
<% Else %>
<option value="" selected>全部新闻</option>
<% End If %>
</select>
<input name="Keyword" type="text" id="Keyword" size="20" value="<%= Keyword %>">
<input name="Submit" type="submit" id="Submit" value="查询">
</div></td>
</tr></form>
</table>
<form name="form1" method="post" action="News_del.asp">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr class="title_top">
<td width="5%"><div align="center">选择 </div></td>
<td width="8%"><div align="center"> ID</div></td>
<td width="30%"><div align="left">新闻标题</div></td>
<td width="10%"><div align="center"> 版本</div></td>
<td width="10%"><div align="center">所属分类</div></td>
<td width="10%"><div align="center"> 推荐</div> <div align="center"></div></td>
<td width="9%"><div align="center"> 点击数</div></td>
<td width="18%"><div align="center">操作</div></td>
</tr>
<% if rs.eof and rs.bof then %>
<tr class="tdbg">
<td colspan="8">
<div align="center"> 暂时没有新闻</div></td>
</tr>
<% else %>
<% for i=1 to rs.PageSize
if rs.EOF or rs.BOF then exit for
%>
<tr class="tdbg">
<td>
<div align="center">
<input type="checkbox" name="delid" value="<%= rs("N_id") %>">
</div></td>
<td>
<div align="center"><%= rs("N_id") %></div></td>
<td><% If newsRadio(2)=1 Then %><a href="../../NewsCenter/<%= rs("n_address") %>" title="点击查看新闻内容" target="_blank"><% Else %><a href="News_Edit.asp?id=<%= rs("N_id") %>&language=<%= rs("N_language") %>&sortid=<%= rs("N_Sortid") %>"><% End If %><%= rs("N_Name") %></a></td>
<td>
<div align="center"><%= Check_Language(rs("N_Language")) %></div></td>
<td><div align="center"><%= Get_Sort_all("NS","NewsSort_"&rs("N_Language"),rs("N_Sortid")) %></div></td>
<td> <div align="center"><% if rs("N_Special")=1 then Response.Write("√") %></div></td>
<td>
<div align="center"><%= rs("N_Click") %></div></td>
<td><div align="center"><a href="News_Edit.asp?id=<%= rs("N_id") %>&language=<%= rs("N_language") %>&sortid=<%= rs("N_Sortid") %>">修改</a> | <a href="News_Move.asp?id=<%= rs("N_id") %>&action=down&language=<%= rs("N_language") %>"><img src="../image/system/arrow_up.gif" alt="上移" width="15" height="13" border="0"></a><a href="News_Move.asp?id=<%= rs("N_id") %>&action=up&language=<%= rs("N_language") %>"><img src="../image/system/arrow_down.gif" alt="下移" width="15" height="13" border="0"></a> | <a href="News_Del.asp?delid=<%= rs("N_id") %>" onClick="return confirm('此操作不可恢复,确定执行吗？');">删除</a></div></td>
</tr>
<% rs.movenext
next
%>
</table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="40">
<div align="center">
<input type="checkbox" name="chkall" value="on" onClick="CheckAll(this.form)" title='全选/不选' >
全选/不选
<input type="submit" name="Submit2" value="删除所选" onClick="return confirm('此操作不可恢复,确定执行吗？');">
</div></td>
</tr>
</table>
<div align="center">
</div>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr>
<td>
<div align="center"><!-- #include file="../../inc/showpage.asp" --></div></td>
</tr>
</table> </form>
<% end if
rs.close
set rs=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -