html,打开FUNCTION目录下的c_html_js.手机监听器修改c_system_lib.williamlong.Execute("SELECT[log_ID],objRS("comm_AuthorID"),InStrRev(IP,[log_ViewNums]FROM[blog_Article]WHERE[log_ID]="&id)If(notobjRS.LoadInfoByArray(Array(objRS("comm_ID"),我发现其原因是大并发用户同时写数据库产生的原因."))+"*"endif修改TArticle的FunctionExport_CMTandTB()函数,数据只写进内存,具体实现方法如下.williamlong.bof)And(notobjRS.""))修改b_article_comment.UnLockElsearyArticleCount(id)=intArticleCountApplication.原创文章如转载,""))改为objComment.html,就是时间缓存,只能留下最后一个回复者的IP地址.我这里想到了一个针对这个题目的解决方案,当缓存时间到了以后,objRS("comm_Author"),objRS("comm_HomePage"),通过一些修改,objRS("comm_Email"),在一定时间内,objRS("comm_PostTime"),"",strLastUpdate,前些天的一些突发事件,之后的外在表现就是CPU占用猛增.经过对Z-Blog的代码进行分析,即使再大的并发量,再把内存的数据写进数据库.LockApplication(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")=aryArticleCountApplication.LoadInfoByArray(Array(objRS("comm_ID"),不过有个题目是,默认的Z-Blog留言评论是没有用户IP地址显示的,就是当单篇文章日访问量数万的时候,Now())>30Then'假如当前时间与上次保存计数值的时间差大于设定的时间间隔,可以在留言中增加用户IP地址前三位的显示功能,objRS("comm_AuthorID"),也不会再发生数据库死锁的题目了.UnLockEndIfCallCloseConnect()EndIfEndFunction另外,使得我发现了Z-Blog存在的一个很严重的性能题目,修改UpdateCountInfo函数为以下代码即可.LockApplication(ZC_BLOG_CLSID&"LAST_UPDATE")=Now()strLastUpdate=Application(ZC_BLOG_CLSID&"LAST_UPDATE")Application.CloseSetbjRS=NothingIfaryArticleCount(id)>intArticleCountThenobjConn.UnLockEndIfIfDateDiff("s",不写进数据库,objRS("comm_Email"),定时写数据库,请注明：转载自月光博客[http：//www.修改方法是,文章评论就会出现评论者的IP地址栏,则把计数值重新写进数据库CallOpenConnect()SetbjRS=objConn.asp文件,objRS("comm_PostTime"),objRS("log_ID").asp文件的PublicFunctionMakeTemplate(strC)函数,加进下面语句：ReDimaryTemplateTagsName(12)ReDimaryTemplateTagsValue(12)aryTemplateTagsName(12)="article/comment/ip"ifAuthorID=1thenaryTemplateTagsValue(12)=""elsearyTemplateTagsValue(12)="ip："+Left(IP,当评论有人回复的是时候,objRS("log_ID"),objRS("comm_HomePage"),会导致数据库死锁,objRS("comm_Content"),增加<#article/comment/ip#>标签.FunctionUpdateCountInfo(id)DimstrLastUpdateDimintArticleCountDimaryArticleCountDimobjRSApplication.之后,objRS("comm_IP"),会有大量并发用户同时写Access数据库,将objComment.LockApplication(ZC_BLOG_CLSID&"LAST_UPDATE")=Now()Application.经过初步的代码修改和测试,objRS("comm_Author"),发现修改完了以后就没有这个题目了.这样,objRS("comm_Content"),".LockstrLastUpdate=Application(ZC_BLOG_CLSID&"LAST_UPDATE")aryArticleCount=Application(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")aryArticleCount(id)=aryArticleCount(id)+1Application(ZC_BLOG_CLSID&"CACHE_ARTICLE_VIEWCOUNT")=aryArticleCountApplication.UnLockIfIsEmpty(strLastUpdate)OrNotIsDate(strLastUpdate)ThenApplication.info/archives/2062.Execute("UPDATE[blog_Article]SET[log_ViewNums]="&CStr(aryArticleCount(id))&"WHERE[log_ID]="&id)Application.eof)ThenintArticleCount=objRS("log_ViewNums")ElseintArticleCount=0EndIfobjRS.info/]本文链接地址：http：//www.