managen_class.asp

来自「网店批发系统,很好很强大,很好很强大很好很强大」· ASP 代码 · 共 92 行
ASP
92 行
<!--#include file = "conn.asp"-->
<!--#include file = "../inc/check_inc.asp"-->
<!--#include file = "include/clsnews.asp"-->
<!--#include file = "include/page.asp"-->
<%
	'操作数据库
	dim act,id
	dim c_name,c_orderid
	
	act = request.QueryString("act")
	id = sqlcheck(request.QueryString("id"))
	c_name = sqlchg(request.Form("c_name"))
	c_orderid = sqlchg(request.Form("c_orderid"))
	
	if act = "add" then
		DBExecute("INSERT INTO n_class (n_classname,n_classorderid) VALUES ('"&c_name&"','"&c_orderid&"')")
		call OUTjs("操作成功","managen_class.asp",0)	
	elseif act = "edit" then
		DBExecute("UPDATE n_class SET n_classname = '"&c_name&"',n_classorderid = "&c_orderid&" WHERE n_classid = "&id&"")
		call OUTjs("操作成功","managen_class.asp",0)
	elseif act = "del" then
		DBExecute("DELETE FROM n_class WHERE n_classid = "&id&"")
		call OUTjs("操作成功","managen_class.asp",0)
	end if

	'读数据
	dim news_query,news_array,news_j
	dim pagenum
	
	pagenum = 15 			'每页显示数量
	
	news_query = "SELECT n_classid,n_classname,n_classorderid FROM n_class ORDER BY n_classorderid,n_classid DESC"
	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>
  </tr>
  <%
  	if ArrayNum <> -1 then
		for news_j = (Page-1)*pagenum to ArrayNum
  %>
  <form name="myform" method="post" action="cs.asp">
	  <tr>
		<td height="30" align="center" class="listitem"><%=news_array(0,news_j)%></td>
		<td align="center" class="listitem"><input name="c_name" type="text" class="input_text" value="<%=news_array(1,news_j)%>" /></td>
		<td align="center" class="listitem"><input name="c_orderid" type="text" class="input_text" value="<%=news_array(2,news_j)%>" /></td>
		<td align="center" class="listitem">
			<input type="submit" class="Button" value="修改" /> 
		    <input type="button" class="Button" onclick="window.location.href='managen_class.asp?act=del&id=<%=news_array(0,news_j)%>';" value="删除" />
		</td>
	  </tr>
  </form>
  <%
  		if news_j = Page*pagenum-1 then exit for
  		next
	end if
  %>
</table>
<%call PageTable(ArrayNum+1,pagenum,"种新闻类别")%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <form name="addform" method="post" action="cs.asp">
  <tr>
    <td height="24" align="center" class="listtitle">添加新分类:</td>
	<td align="center" class="listtitle"><input name="c_name" type="text" class="input_text" value="" /></td>
	<td align="center" class="listtitle">
	<%
		if ArrayNum <> -1 then
			response.Write("<input name='c_orderid' type='text' value='"&news_array(2,news_j-1)+1&"' class='input_text'/>")
		else
			response.Write("<input name='c_orderid' type='text' value='10000' class='input_text'/>")
		end if
	%>		
	</td>
	<td align="center" class="listtitle"><input type="submit" class="Button" value="添加" /> </td>
  </tr>
  </form>
</table>
</body>
</html>
⌨️ 快捷键说明

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

managen_class.asp - 源码说明

⌨️ 快捷键说明
