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 + -
显示快捷键?