<!--#include file="../inc/config.asp" -->
<!--#include file="../inc/conn.asp" -->
<!--#include file="inc/function.asp" -->
<!--#include file="inc/Session.asp" -->
<!--#include file="inc/createfile.asp"-->
<!-- #include file="inc/checkrole.asp" -->
<%
Response.Charset="GB2312"

Server.ScriptTimeout = 999999
'''''''''''''''''''''''''''''''''''''''''''''''
call checkPrevilege(Session("Name"),"p05")
'''''''''''''''''''''''''''''''''''''''''''''''
dim classid,parentlist,position,url,isChannel
if(request.QueryString("classid")<>"") then
	classid=Clng(request.QueryString("classid"))
else
	response.Write("栏目ID不能为空!")
	response.End()
end if
if(request.QueryString("flag")<>"") then
	isChannel=Cint(request.QueryString("flag"))
else
	isChannel=0
end if
dim BeginTime,TempCont,Tempdir,ListName
BeginTime=Timer
'=================================================================================
'                             +-查询数据库二级分类-+
'=================================================================================
if(isChannel=0) then
	call CreateHtml(classid,NewsNumPerPage)
else
	call CreateCatalogHtml(classid)
end if
call connclose()
response.Write("发布成功!<br>")
response.Write("<br><br><br>执行时间"&CStr(FormatNumber((Timer-BeginTime)*1000,2))& "毫秒")
%>