%@ CODEPAGE=65001 %>
<%
'///////////////////////////////////////////////////////////////////////////////
'// Z-Blog
'// 作 者: 朱煊(zx.asd)
'// 版權所有: RainbowSoft Studio
'// 技術支持: rainbowsoft@163.com
'// 程序名稱:
'// 程序版本:
'// 單元名稱: catalog.asp
'// 開始時間: 2005.02.11
'// 最后修改:
'// 備 注: 目錄
'///////////////////////////////////////////////////////////////////////////////
%>
<% Option Explicit %>
<% On Error Resume Next %>
<% Response.Charset="UTF-8" %>
<% Response.Buffer=True %>
<%
Call System_Initialize()
'plugin node
For Each sAction_Plugin_Catalog_Begin in Action_Plugin_Catalog_Begin
If Not IsEmpty(sAction_Plugin_Catalog_Begin) Then Call Execute(sAction_Plugin_Catalog_Begin)
Next
Dim ArtList
Set ArtList=New TArticleList
ArtList.LoadCache
ArtList.template="CATALOG"
If ArtList.ExportByMixed(Request.QueryString("page"),Request.QueryString("cate"),Request.QueryString("auth"),Request.QueryString("date"),Request.QueryString("tags"),ZC_DISPLAY_MODE_ALL) Then
ArtList.Build
Response.Write ArtList.html
End If
'plugin node
For Each sAction_Plugin_Catalog_End in Action_Plugin_Catalog_End
If Not IsEmpty(sAction_Plugin_Catalog_End) Then Call Execute(sAction_Plugin_Catalog_End)
Next
Call System_Terminate()
%><%
If Err.Number<>0 then
Call ShowError(0)
End If
%>快乐十分守号规律技巧
体彩快中彩开奖结果
安徽25选5开奖号码
重庆快乐10分开奖直播
腾讯分分彩热门玩法
网络捕鱼赌钱
东方6十1走势图
香港六彩特码王赛马会
扎金花千术
ag漏洞让我赢了十几万
江苏体彩七位数近二十期号码
排列3杀号定胆
以太坊矿机在哪买
陕西麻将怎么打
浙江快乐彩规则
江西多乐彩软件
河北11选5选号技巧