青青子衿, 悠悠我心, 但为君故, 沉吟至今
« IPV6和网络实名制谷歌中国发布广告澄清不实传言 »

Z-Blog性能优化和评论IP显示

  前些天的一些突发事件,使得我发现了Z-Blog存在的一个很严重的性能问题,就是当单篇文章日访问量数万的时候,会有大量并发用户同时写Access数据库,会导致数据库死锁,之后的外在表现就是CPU占用猛增。

  经过对Z-Blog的代码进行分析,我发现其原因是大并发用户同时写数据库产生的原因。

  我这里想到了一个针对这个问题的解决方案,就是时间缓存,定时写数据库,在一定时间内,数据只写入内存,不写入数据库,当缓存时间到了以后,再把内存的数据写入数据库。这样,即使再大的并发量,也不会再发生数据库死锁的问题了。

  经过初步的代码修改和测试,发现修改完了以后就没有这个问题了。

  修改方法是,打开FUNCTION目录下的c_html_js.asp文件,修改UpdateCountInfo函数为以下代码即可。

Function UpdateCountInfo(id)

 Dim strLastUpdate
 Dim intArticleCount
 Dim aryArticleCount
 Dim objRS

 Application.Lock
 strLastUpdate=Application(ZC_BLOG_CLSID&"LAST_UPDATE")
 aryArticleCount=Application(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")
 aryArticleCount(id)=aryArticleCount(id)+1
 Application(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")=aryArticleCount
 Application.UnLock

 If IsEmpty(strLastUpdate) Or Not IsDate(strLastUpdate) Then
  Application.Lock
  Application(ZC_BLOG_CLSID&"LAST_UPDATE") = Now()
  strLastUpdate = Application(ZC_BLOG_CLSID&"LAST_UPDATE")
  Application.UnLock
 End If

 If DateDiff("s",strLastUpdate,Now()) > 30 Then
 '如果当前时间与上次保存计数值的时间差大于设定的时间间隔,则把计数值重新写入数据库
  Call OpenConnect()

  Set objRS=objConn.Execute("SELECT [log_ID],[log_ViewNums] FROM [blog_Article] WHERE [log_ID] =" & id)
  If (not objRS.bof) And (not objRS.eof) Then
   intArticleCount=objRS("log_ViewNums")
  Else
   intArticleCount=0
  End If
  objRS.Close
  Set objRS=Nothing

  If aryArticleCount(id) > intArticleCount Then
   objConn.Execute("UPDATE [blog_Article] SET [log_ViewNums]=" & CStr(aryArticleCount(id)) & " WHERE [log_ID] =" & id)
   Application.Lock
   Application(ZC_BLOG_CLSID&"LAST_UPDATE") = Now()
   Application.UnLock
  Else
   aryArticleCount(id) = intArticleCount
   Application.Lock
   Application(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")=aryArticleCount
   Application.UnLock
  End If

  Call CloseConnect()
 End If

End Function

  另外,默认的Z-Blog留言评论是没有用户IP地址显示的,通过一些修改,可以在留言中增加用户IP地址前三位的显示功能,具体实现方法如下。

  修改c_system_lib.asp文件的Public Function MakeTemplate(strC)函数,加入下面语句:

  ReDim aryTemplateTagsName(12)
  ReDim aryTemplateTagsValue(12)

  aryTemplateTagsName( 12)="article/comment/ip"
  if AuthorID=1  then
   aryTemplateTagsValue(12)=""
  else
   aryTemplateTagsValue(12)="ip: " + Left(IP, InStrRev(IP, ".")) + "*"
  end if

  修改TArticle的Function Export_CMTandTB()函数,将 objComment.LoadInfoByArray(Array(objRS("comm_ID"),objRS("log_ID"),objRS("comm_AuthorID"),objRS("comm_Author"),objRS("comm_Content"),objRS("comm_Email"),objRS("comm_HomePage"),objRS("comm_PostTime"),"","")) 改为 objComment.LoadInfoByArray(Array(objRS("comm_ID"),objRS("log_ID"),objRS("comm_AuthorID"),objRS("comm_Author"),objRS("comm_Content"),objRS("comm_Email"),objRS("comm_HomePage"),objRS("comm_PostTime"),objRS("comm_IP"),""))

  修改 b_article_comment.html ,增加 <#article/comment/ip#>标签。

  之后,文章评论就会出现评论者的IP地址栏,不过有个问题是,当评论有人回复的是时候,只能留下最后一个回复者的IP地址。解决的方法是:

  修改c_system_lib.asp文件,找到
 IP=Request.ServerVariables("REMOTE_ADDR")
 Agent=Request.ServerVariables("HTTP_USER_AGENT")

  修改为
   if IP="" Then
 IP=Request.ServerVariables("REMOTE_ADDR")
 Agent=Request.ServerVariables("HTTP_USER_AGENT")
   End If

  这样就不会覆盖掉留言回复者的IP了。



  除非注明,月光博客文章均为原创,转载请以链接形式标明本文地址

  本文地址:http://www.williamlong.info/archives/2062.html
  • 文章排行:
  • 1.卢松松
  • 这就和在zblog后台查看评论者IP是一个意思,只不过挪到前台显示了,
    zblog后台也是一样,当前评论者IP会被回复者覆盖。
    另外想问下为什么要显示IP呢?
    哈哈大侠 于 2010-1-22 7:08:50 回复
    呵呵呵,你在害怕什么……

    我回复了,应该你安全了……显示的是我的了吧。
  • 2010/1/21 20:19:52   支持(10)反对(5) 回复
  • 2.看ip
  • 看ip,羡慕会写程序的人啊。
    ip转地区 于 2010-1-22 8:55:47 回复
    ip转换为地区更好了,直接显示地区了。
  • 2010/1/22 8:53:47   支持(11)反对(6) 回复
  • 4.myway
  • 但愿我的流量有那么多的时候哈····
  • 2010/3/12 20:18:28   支持(13)反对(8) 回复
  • 5.巫术时代
  • 希望月光可以写一个关于这个问题的文章:
    ZBLOG如果调用简介作为description
    里面的<p>等无用字符会被W3C验证为错误
    请问如何解决
  • 2011/1/5 10:14:51   支持(10)反对(5) 回复
  • 7.猴子
  • Z-Blog有月光,真是广大Z-Bloger的福分!
  • 2010/1/22 1:15:55   支持(10)反对(6) 回复
  • 8.园子
  • 最后一个问题解决了就完美了
    非常完美
    哈哈。
  • 2010/1/22 9:10:11   支持(8)反对(4) 回复
  • 9.阿瓦博客
  • ZBLOG最多能建多少用户?另外:比如我在我的博客里建一个“月光博客”的用户,然后以“月光博客”为作者转载真正的月光博客的文章,算不算侵权?
    williamlong 于 2010-1-22 13:19:52 回复
    最好不要这么干。
    阿瓦博客 于 2010-1-22 13:51:50 回复
    博主尚未赐教主要问题:ZBLOG最多能建多少用户?
  • 2010/1/22 12:06:34   支持(10)反对(6) 回复
  • 10.生活小窍门网
  • 估计这个IP要是记到数据库里面的话IP多了那也是一个恐怖的数据呀
  • 2010/2/2 16:56:46   支持(8)反对(4) 回复
  • 12.犹也
  • 有多少个Z-Bolg博客的文章浏览量是过万的?请问!
    技术学习 于 2010-1-21 21:18:48 回复
    我的已经过万了哦!你可以去看看哦!
    犹也 于 2010-1-21 23:14:54 回复
    网址拿来
  • 2010/1/21 20:45:04   支持(8)反对(5) 回复
  • 13.飒一
  • 这是什么语言呐 看着像vb呢
    音乐天堂 于 2010-1-21 21:11:51 回复
    VBScript
  • 2010/1/21 20:56:43   支持(8)反对(5) 回复
  • 14.无名
  • 的确是个问题 希望ZBLOG在下一个版本的时候可以解决数据库锁死的问题
  • 2010/1/22 9:41:10   支持(11)反对(8) 回复
  • 15.mwm5
  • 国外用perl也很多。。。

    asp确实是中国特色。。
  • 2010/1/24 11:48:03   支持(9)反对(6) 回复
  • 17.lovezypj
  • 1.8修改没用啊,还是显示<#article/comment/ip#> ,是不是这个标签没定义啊
    lovezypj 于 2010-9-6 21:28:22 回复
    已经搞定了,原来位置放错了,多谢月光
  • 2010/9/6 21:10:14   支持(9)反对(6) 回复
  • 19.老刘
  • 您最后一个修改,我试了几次都有问题,怎么回事呢
  • 2011/5/25 10:51:44   支持(9)反对(6) 回复
  • 22.卢松松
  • 月光也采用评论倒叙输出了啊。
    另外发现把评论先加入内存在写入数据库,非常慢啊
    lao910 于 2010-1-22 1:29:05 回复
    一句话,Access数据库超过100M,不慢也难。还是换个更好一些。
    哈哈大侠 于 2010-1-22 7:10:00 回复
    没想到月光居然用的是access数据库,呵呵,以为这样的站点应该都是用mssql了
    lovezypj 于 2010-9-6 20:28:08 回复
    Zblog就是Access的数据库,选择他也是无奈,本来选择PHP+Mysql的,但是使用mysql要额外掏钱,所以...(mysql不要钱,空间商要钱)
  • 2010/1/21 20:21:58   支持(8)反对(7) 回复
  • 23.yuling
  • 请教下: 我学国贸的,除了学专业,学英语,还学什么好呢?如果学计算机,去哪里学比较好呢?或者说读哪本书有帮助呢?多谢
  • 2010/1/22 1:25:56   支持(8)反对(7) 回复
  • 24.非博
  • 牛,要好好学习学习,不能浪费!
  • 2010/1/22 12:43:03   支持(7)反对(6) 回复
  • 25.谢锋
  • 现在很少用access的了吧,不过跟asp搭挡倒还不错!
  • 2010/1/22 13:23:12   支持(8)反对(7) 回复
  • 26.sunxt
  • 月光很强大啊,从月光这里得到不少技巧!
  • 2010/1/22 17:16:30   支持(11)反对(10) 回复
  • 29.kulerop
  • 到底哪个博客功能最全面呢?
  • 2010/2/22 16:02:37   支持(8)反对(7) 回复
  • 31.看海听风
  • 慕名而来,哈哈,拿去用一下,ip就不用了
  • 2011/2/10 15:43:55   支持(8)反对(7) 回复
  • 32.kenneth
  • 会自己写程序真好
    阳光不锈 于 2010-1-21 20:33:40 回复
    严重同意。
    a 于 2010-1-22 19:24:14 回复
    极其严重同意
    阿瓦博客 于 2010-1-23 8:46:59 回复
    最严重地同意!
    醉美点金 于 2010-1-26 14:15:42 回复
    越来越崇拜月光了啊!
  • 2010/1/21 20:15:24   支持(10)反对(10) 回复
  • 33.haphic
  • 我还以为月光早就去掉了浏览数显示了呢...
    缓存进 Aplication 变量的话, 如果遇上系统自动回收进程池的话, 会导致浏览数失准吧? 不过这么大的浏览数, 稍微失准些也无妨, 总比没有浏览数好.
    我发现 Z-Blog 里没建立后没清空的对象, 动态数组真不少, 不知道运行时间长了会不会因此吃掉大量内存?
  • 2010/1/22 2:36:01   支持(8)反对(8) 回复
  • 34.oodd
  • 显ip为了吓人么?哈哈。
    “你的IP已被记录"
  • 2010/1/22 3:36:42   支持(8)反对(8) 回复
  • 35.漂博远方
  • 很好很强大,建议ip地址隐藏,后台可见即可!
  • 2010/1/22 9:16:36   支持(8)反对(8) 回复
  • 36.zzz
  • 都什么年代了,你还用asp+access这样的古董。。。
  • 2010/1/22 9:52:32   支持(10)反对(10) 回复
  • 37.55555
  • 呵呵, asp是符合中国国情的。在国外几乎找不到asp的影子了, 一般是php
    看看GPS地图网 于 2010-1-22 10:51:16 回复
    好强大。。我拿来用用!!
  • 2010/1/22 10:05:15   支持(10)反对(10) 回复
  • 38.苏同学
  • 不错,。就是不懂asp,不会同,在郁闷中···
  • 2010/8/17 16:31:57   支持(7)反对(7) 回复
  • 39.1466071995070
  • hello ,
    楼主,你的bof用法不对吧,Beikao帝(Http://Www.Beikaodi.Com/word/bof.html)中的例句好像不是你这么用的
    time:6:13:15 PM
  • 2016/6/16 18:14:45   支持(0)反对(0) 回复
  • 40.卢松松
  • 先站个沙发!
    lao910 于 2010-1-22 1:27:15 回复
    你真牛,沙发占了不算,还另外再占几个位子。在牟长青博客上知道了你,感觉你真是位牛人,佩服!
    浅心莓客 于 2010-1-23 12:21:21 回复
    牛人一般都在时刻等着呢 呵呵
  • 2010/1/21 20:14:42   支持(8)反对(9) 回复
  • 42.广告主义
  • 来学习一下 O(∩_∩)O~O(∩_∩)O~
  • 2010/1/22 8:58:32   支持(10)反对(11) 回复
  • 44.月亮实验室
  • 月光,建议你将这些改进加入后续版本的zblog中
  • 2010/1/22 17:18:45   支持(10)反对(11) 回复
  • 46.Firm
  • 这个俺好像用不到,做不到那么高的访问量。
  • 2010/1/23 19:51:40   支持(8)反对(9) 回复
  • 48.游魂
  • 我觉得除了像月光博客这么变态的博客以外,基本上没有那个博客能达到每篇文章的浏览量都过万了,所以对于一般人来讲没啥用
  • 2010/1/21 20:37:01   支持(6)反对(8) 回复
  • 49.上海3M
  • ZBLOG算不错的,但ASP终究会过时!
    Heermosi 于 2010-1-22 9:34:59 回复
    是我们的开发工具太落后了,招募人手开发开发工具中……
  • 2010/1/21 20:47:04   支持(6)反对(8) 回复
  • 50.lao910
  • 留个脚步。同时感觉月光应该换个程序了。
  • 2010/1/22 1:25:59   支持(4)反对(6) 回复
  • 52.泥博客
  • 我的博客什么时候才用到这样的代码呀。
  • 2010/1/22 8:51:43   支持(10)反对(12) 回复
  • 53.毛刷
  • 有博主这么强的程序功底就好了。汗。
  • 2010/1/22 11:51:49   支持(7)反对(9) 回复
  • 55.私爱
  • 我的空间支持asp 为什么不能搭建z-blog呢
  • 2010/7/26 15:58:14   支持(5)反对(7) 回复
  • 57.初夏
  • 我知道我的网站什么时候才能到这种水平,哈哈
  • 2011/5/19 14:06:58   支持(6)反对(8) 回复
  • 61.世纪BLOG
  • 不知道会不会引响到别的
    世纪BLOG 于 2010-9-7 0:54:34 回复
    美观之类的
  • 2010/9/7 0:53:40   支持(9)反对(12) 回复
  • 62.说的不明确在哪加
  • 修改c_system_lib.asp文件的Public Function MakeTemplate(strC)函数,加入下面语句:

    ReDim aryTemplateTagsName(12)
    ReDim aryTemplateTagsValue(12)

    aryTemplateTagsName( 12)="article/comment/ip"
    if AuthorID=1 then
    aryTemplateTagsValue(12)=""
    else
    aryTemplateTagsValue(12)="ip: " + Left(IP, InStrRev(IP, ".")) + "*"
    end if
  • 2010/11/30 12:36:42   支持(7)反对(10) 回复
  • 63.油性皮肤
  • 学习下,大家都说ZBLOG不安全,我都想学别的程序了,大家给点意见哈,
  • 2011/10/12 0:41:25   支持(6)反对(9) 回复
  • 64.从前网
  • 月光博客访问量上10万的博文都还是有的.
  • 2010/1/21 20:52:49   支持(4)反对(8) 回复
  • 65.快加蓝
  • 很棒,可惜我的日志里数万远着呢。。。

    发个小广告:各位朋友,老快曾经委托别人注册过一个.cn域名,注册信息是别人的,近日要过期了。因为忘记了是在哪个代理注册的,现在想请各位帮忙,将这个域名过期后抢注下来,用我的信息或公司的信息,当然,可以支持一点的劳务费的。有意帮忙的朋友,可以去下我的博客,老快会与你联系。谢谢!!!
    baobao 于 2010-1-23 19:26:40 回复
    劝你放弃这个cn域名,不然将来你会更痛苦。
    90淘 于 2010-1-29 21:24:57 回复
    同意
    舞键鼠 于 2010-1-31 22:49:09 回复
    CN不靠谱,打死不用。
  • 2010/1/21 22:41:03   支持(6)反对(10) 回复
  • 66.阿瓦博客
  • 急!谁有抢月光博客沙发的技巧?
    小玩 于 2010-1-22 12:10:51 回复
    我有
    NA 于 2010-1-22 16:01:48 回复
    我有,给我5毛!
    阿瓦博客 于 2010-1-22 17:47:07 回复
    没见你在沙发上坐过啊
  • 2010/1/22 12:08:56   支持(5)反对(9) 回复
  • 67.MJ
  • 现在才知道这个可以编程的哦,强!
  • 2010/1/25 22:24:58   支持(7)反对(11) 回复
  • 68.天边鱼
  • 我问下博主下面有个"记住我,下次回复时不用重新输入个人信息"

    这个功能是怎么实现的啊?
  • 2010/2/3 17:02:23   支持(4)反对(8) 回复
  • 71.老刘
  • 总之加了您此应文的最后一个
    if IP="" Then
    IP=Request.ServerVariables("REMOTE_ADDR")
    Agent=Request.ServerVariables("HTTP_USER_AGENT")
       End If
    就会出现500错误,后台前台均进不了
  • 2011/5/25 10:54:53   支持(5)反对(9) 回复
  • 72.IDD益彤益生菌
  • 不错,学习了,关注益彤益生菌
  • 2012/7/10 0:06:00   支持(4)反对(8) 回复
  • 73.边缘传说
  • 请问月光的数据库现在有多少M了?应该很大了吧,怎么速度还是这么快。
    junstyle 于 2010-2-1 12:58:49 回复
    他是生成静态页面了,当然能抗
  • 2010/1/22 11:35:07   支持(8)反对(13) 回复
  • 76.ooDD
  • 显ip为了吓人么?哈哈。
    “你的IP已被记录"的确会把人吓倒
  • 2010/1/22 3:37:11   支持(8)反对(14) 回复
  • 78.雪狼子
  • 我们这些小喽啰就不用了,一般人做不到单篇文字访问过w的,呵呵!不过学习是必要的!
  • 2010/1/22 9:50:11   支持(6)反对(14) 回复

发表评论:

 请勿发送垃圾信息、广告、推广信息或链接,这样的信息将会被直接删除。

订阅博客

  • 订阅我的博客:订阅我的博客
  • 关注新浪微博:关注新浪微博
  • 关注腾讯微博:关注腾讯微博
  • 关注认证空间:关注QQ空间
  • 通过电子邮件订阅
  • 通过QQ邮件订阅

站内搜索

热文排行


月度排行

本站采用创作共用版权协议, 要求署名、非商业用途和相同方式共享. 转载本站内容必须也遵循“署名-非商业用途-相同方式共享”的创作共用协议.
This site is licensed under a Creative Commons Attribution-NonCommercial-ShareAlike 3.0 License.