category_order.asp

来自「这是我根据动网新闻核心自行设计的校园新闻系统」· ASP 代码 · 共 21 行

<!-- #include file="../login/check.asp" -->
<!-- #include file="../../inc/conn.asp" -->
<!-- #include file="../../inc/function.asp" -->
<!-- #include file="../category/category_class.asp" -->
<%
Dim action
Dim id
Dim categorytype
Dim deep
Dim url
url=Request.ServerVariables("HTTP_REFERER")
	action=Request.QueryString("action")
	id=Request.QueryString("id")
	categorytype=Request.QueryString("categorytype")
	deep=Request.QueryString("deep")

Set CID=new LBCategory
Call CID.SetCategoryOrder(action,id)

Response.Redirect url
%>