惯性聚合 高效追踪和阅读你感兴趣的博客、新闻、科技资讯
阅读原文 在惯性聚合中打开

推荐订阅源

月光博客
月光博客
Martin Fowler
Martin Fowler
Last Week in AI
Last Week in AI
罗磊的独立博客
阮一峰的网络日志
阮一峰的网络日志
博客园 - 【当耐特】
奇客Solidot–传递最新科技情报
奇客Solidot–传递最新科技情报
博客园 - 三生石上(FineUI控件)
S
SegmentFault 最新的问题
V
Visual Studio Blog
Hugging Face - Blog
Hugging Face - Blog
雷峰网
雷峰网
博客园_首页
人人都是产品经理
人人都是产品经理
量子位
美团技术团队
The Cloudflare Blog
小众软件
小众软件
WordPress大学
WordPress大学
有赞技术团队
有赞技术团队
M
MIT News - Artificial intelligence
Microsoft Security Blog
Microsoft Security Blog
D
DataBreaches.Net
博客园 - Franky

月光博客

AI编程从零开始:环境配置到开发调试-月光博客 母亲被保健品诈骗-月光博客 向身体低头,向岁月妥协:我的高血压“还债日记” -月光博客 月光博客电子书:《信息安全指南》 谷歌发布2025年度搜索排行榜 中国2025社会热点大事记 2025年十大流行语发布 7天3次,骗子骗走我母亲95万元 “技术男”设三重安全墙,母亲95万存款还是被骗走了 电信诈骗后的复盘:母亲的95万元,是怎么从手机银行里消失的 母亲被电信诈骗95万元的全过程 阿根廷警察被谷歌街景相机拍到裸照 网信办开展“清朗·整治恶意挑动负面情绪问题”专项行动 翟欣欣敲诈勒索案一审获刑12年 《绝命毒师》影评:力工觉醒后的梭哈至死 《人工智能生成合成内容标识办法》正式施行 用AI分析你的财务信息 腾讯子公司实习HR怒怼求职者后被开除 OpenAI发布最强模型GPT-5,免费向所有用户开放 用AI解构你的日记 用AI分析你的游戏偏好 用AI分析你的观影偏好 用AI分析你的听歌偏好 《白鹿原》人物分析:乱世浮沉中的人性剖析 乌托邦的捷径:让AI治理“失败国家” 苹果AI的“路径错误”:为什么它在大模型时代掉队了? 《暗黑破坏神3》第35赛季开荒指南 我对特朗普的看法 欧·亨利十大经典小说鉴赏 HBO电视剧《最后生还者》第二季影评
ZBLOG 1.4 SP1的静态补丁和插件发布
月光 · 2005-08-31 · via 月光博客

今天花了些时间将ZBLOG升级到1.4 SP1,静态化补丁也同时升级到SP1,并支持插件方式的运行。

静态化补丁代码部分的变化还是只修改了c_system_event.asp和c_system_lib.asp两个文件,同时提供的PLUGIN功能新增加两个文件。因此一共是四个文件。

使用和安装这个补丁很简单,先下载Z-Blog 1.4 SP1正式版,然后下载Z-Blog 1.4 SP1月光静态版补丁,注意此补丁只能在这个版本上使用,不要在其他版本上使用。将补丁里的两个ASP文件覆盖到原版目录下,catbuild目录放到PLUGIN目录下即可。

一般用户使用下面3个操作就可以安装好静态化补丁:

1、下载原版Z-Blog 1.4 SP1

2、下载月光静态化补丁1.4 SP1。将其中2个文件覆盖原版文件。同时安装PLUGIN。

3、重新进行文件重建操作。

此时Z-BLOG的目录文件应该被静态化了。

如果你的ZBLOG是自己修改过的版本,那么可以使用下面的操作手动进行静态化修改。其操作较为复杂,不建议使用。

c_system_event.asp 文件修改:

648行修改为:

strArchives=strArchives & "<li><a href="""& ZC_BLOG_HOST & ZC_STATIC_DIRECTORY & "/" & Year(dtmYM(i)) & "_" & Right("00"&Month(dtmYM(i)),2) &  "." & ZC_STATIC_TYPE & """>" & Year(dtmYM(i)) & " " & ZVA_Month(Month(dtmYM(i))) & " (" & objRS(0) & ")" +"</a></li>"


1643-1646行修改为:

 s=ZC_STATIC_DIRECTORY & "/" &y&"_"&Right("00"&(m-1),2) & "." & ZC_STATIC_TYPE
 t=ZC_STATIC_DIRECTORY & "/" &y&"_"&Right("00"&(m+1),2) & "." & ZC_STATIC_TYPE
 If m=1 Then s=ZC_STATIC_DIRECTORY & "/" &(y-1)&"_12" & "." & ZC_STATIC_TYPE
 If m=12 Then t=ZC_STATIC_DIRECTORY & "/" &(y+1)&"_01" & "." & ZC_STATIC_TYPE

1649行修改为:

 strCalendar=strCalendar & "<p class=""y""><a href="""&ZC_BLOG_HOST &s&""">&lt;&lt;</a>  <a href="""& ZC_BLOG_HOST &ZC_STATIC_DIRECTORY & "/"&y&"_"&right("00"&m,2)& "." & ZC_STATIC_TYPE&""">"&y&"·"&m&"</a>  <a href="""&ZC_BLOG_HOST &t&""">&gt;&gt;</a></p>"


之后属于增加的代码部分:

在1201行前增加一行:
 MakeCatReBuild

在1206行后增加以下代码:

'*********************************************************
' 目的:    All Category ReBuild
'*********************************************************
Function MakeCatReBuild()

 Dim objPage
 Dim objRS
 Dim ArtList
 Dim cate_id,cate_year,cate_month

 '生成分类目录文件开始
 Set objRS=objConn.Execute("SELECT cate_id FROM blog_Category ORDER BY cate_id ")
 While Not objRS.eof
  '取得目录ID
  cate_id=cstr(objRS("cate_id"))
  '生成一个分类目录文件
  Set ArtList=New TArticleList
  ArtList.LoadCache
  ArtList.template="CATALOG"
  If ArtList.ExportByCache(Request.QueryString("page"),cate_id,Request.QueryString("auth"),Request.QueryString("date"),Request.QueryString("tags"),ZC_DISPLAY_MODE_ALL) Then
   ArtList.Build
   ArtList.FileName="cat_" & cate_id
   ArtList.Save
  End If
  Set ArtList=Nothing
  objRS.MoveNext
 Wend
 objRS.Close
 Set objRS=Nothing
 '生成分类目录文件结束

 '生成日期目录文件开始
 Set objRS=objConn.Execute("SELECT year(log_posttime) as cate_year,month(log_posttime) as cate_month FROM blog_Article group by year(log_posttime),month(log_posttime) ")
 While Not objRS.eof
  '取得目录ID
  cate_year=cstr(objRS("cate_year"))
  cate_month=cstr(objRS("cate_month"))
  '生成一个日期目录文件
  Set ArtList=New TArticleList
  ArtList.LoadCache
  ArtList.template="CATALOG"
  If ArtList.ExportByCache(Request.QueryString("page"),Request.QueryString("cate"),Request.QueryString("auth"),cate_year & "-" & cate_month,Request.QueryString("tags"),ZC_DISPLAY_MODE_ALL) Then
   ArtList.Build
   ArtList.FileName=cate_year & "_" & right("00"&cate_month,2)
   ArtList.Save
  End If
  Set ArtList=Nothing
  objRS.MoveNext
 Wend
 objRS.Close
 Set objRS=Nothing
 '生成日期目录文件结束

 MakeCatReBuild=True

End Function
'*********************************************************

c_system_lib.asp修改:

110行修改为:
Url = ZC_BLOG_HOST & ZC_STATIC_DIRECTORY & "/" & "cat_" & ID & "." & ZC_STATIC_TYPE

1346行修改为:
s=ZC_BLOG_HOST & "catalog.asp?"& t &"page=1"

1365行修改为:
s=ZC_BLOG_HOST & "catalog.asp?"& t &"page="& i

1376行修改为:
s=ZC_BLOG_HOST & "catalog.asp?"& t &"page="& intAllPage

如果有不愿意手工修改的,就直接下载下面的文件覆盖就可以了。

ZBLOG 1.4 SP1的静态补丁和插件发布