<%@ 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 %>二八杠网站 快三助赢计划软件app 广东快乐十分号码推荐 云南快乐10分走势图50 辽宁福彩快乐12助手 login彩乐网 2018七星开奖结果表 重庆时时彩2期计划网页 极速十一选五计划软件手机版式 四肖八码中特 噢百万彩票香港49选7