managenews.asp

来自「网店批发系统,很好很强大,很好很强大很好很强大」· ASP 代码 · 共 93 行

ASP
93
字号
<!--#include file = "conn.asp"-->
<!--#include file = "../inc/check_inc.asp"-->
<!--#include file = "include/clsnews.asp"-->
<!--#include file = "include/page.asp"-->
<%
	'操作数据库
	dim timenow,act,id
	dim n_title,n_content,n_username,n_classid,n_orderid
	
	timenow = now()
	act = request.QueryString("act")
	id = sqlcheck(request.QueryString("id"))
	n_title = sqlchg(request.Form("n_title"))
	n_content = request.Form("n_content")
	n_username = sqlchg(request.Form("n_username"))
	n_classid = sqlcheck(request.Form("n_classid"))
	n_orderid = sqlchg(request.Form("n_orderid"))
	
	if act = "add" then
		'dim re
		're = "(img)" 
		'n_content = CheckExp(re,n_content,"<@.@>")
		'response.Write n_content
		'response.End()
		DBExecute("INSERT INTO n_news (newstitle,newscontent,newsusername,n_classid,newsorderid,newsdate) VALUES ('"&n_title&"','"&n_content&"','"&n_username&"',"&n_classid&","&n_orderid&",'"&timenow&"')")
		call OUTjs("操作成功","managenews.asp",0)	
	elseif act = "edit" then
		DBExecute("UPDATE n_news SET newstitle='"&n_title&"',newscontent='"&n_content&"',newsusername='"&n_username&"',n_classid="&n_classid&",newsorderid="&n_orderid&" WHERE newsid = "&id&"")
		call OUTjs("操作成功","managenews.asp",0)
	elseif act = "del" then
		DBExecute("DELETE FROM n_news WHERE newsid = "&id&"")
		call OUTjs("操作成功","managenews.asp",0)
	end if

	'读数据
	dim news_query,news_array,news_j
	dim pagenum
	dim classid
	
	pagenum = 15 			'每页显示数量
	
	classid = sqlcheck(request.QueryString("classid"))
	
	if classid <> "" then
		news_query = "SELECT n.newsid,c.n_classname,n.newstitle,n.newsdate,n.newsorderid,n.n_classid FROM n_news n INNER JOIN n_class c ON c.n_classid = n.n_classid WHERE n.n_classid = "&classid&" ORDER BY newsorderid,newsid DESC"
	else
		news_query = "SELECT n.newsid,c.n_classname,n.newstitle,n.newsdate,n.newsorderid,n.n_classid FROM n_news n INNER JOIN n_class c ON c.n_classid = n.n_classid ORDER BY newsorderid,newsid DESC"	
	end if
	
	news_array = DBClass(news_query)
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>新闻管理</title>
<link href="css/css.css" rel="stylesheet" type="text/css" />
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="24" align="center" class="listtop">序号</td>
	<td align="center" class="listtop">类别名称</td>
	<td align="center" class="listtop">新闻标题</td>
	<td align="center" class="listtop">发布时间</td>
	<td align="center" class="listtop">排序号</td>
	<td align="center" class="listtop">操作</td>
  </tr>
  <%
  	if ArrayNum <> -1 then
		for news_j = (Page-1)*pagenum to ArrayNum
  %>
	  <tr onMouseOver="this.style.backgroundColor='#FBF9F4';" onMouseOut="this.style.backgroundColor='#FFFFFF'">
		<td height="24" align="center" class="listitem"><%=news_array(0,news_j)%></td>
		<td align="center" class="listitem"><a href="managenews.asp?classid=<%=news_array(5,news_j)%>"><%=news_array(1,news_j)%></a></td>
		<td align="left" class="listitem"><%=news_array(2,news_j)%></td>
		<td align="center" class="listitem"><%=news_array(3,news_j)%></td>
		<td align="center" class="listitem"><%=news_array(4,news_j)%></td>
		<td align="center" class="listitem">
			<input type="button" class="Button" onclick="cs.asp';" value="修改" /> 
		    <input type="button" class="Button" onclick="cs.asp';" value="删除" />
		</td>
	  </tr>
  <%
  		if news_j = Page*pagenum-1 then exit for
  		next
	end if
  %>
</table>
<%call PageTable(ArrayNum+1,pagenum,"条新闻")%>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?