Z-Blog 留言評論顯示IP地址和性能優(yōu)化
來源:易賢網(wǎng) 閱讀:920 次 日期:2014-05-14 14:40:47
溫馨提示:易賢網(wǎng)小編為您整理了“Z-Blog 留言評論顯示IP地址和性能優(yōu)化”,方便廣大網(wǎng)友查閱!

點(diǎn)評:前些天的一些突發(fā)事件,使得我發(fā)現(xiàn)了Z-Blog存在的一個很嚴(yán)重的性能問題,就是當(dāng)單篇文章日訪問量數(shù)萬的時候,會有大量并發(fā)用戶同時寫Access數(shù)據(jù)庫,會導(dǎo)致數(shù)據(jù)庫死鎖,之后的外在表現(xiàn)就是CPU占用猛增。

經(jīng)過對Z-Blog的代碼進(jìn)行分析,我發(fā)現(xiàn)其原因是大并發(fā)用戶同時寫數(shù)據(jù)庫產(chǎn)生的原因。

我這里想到了一個針對這個問題的解決方案,就是時間緩存,定時寫數(shù)據(jù)庫,在一定時間內(nèi),數(shù)據(jù)只寫入內(nèi)存,不寫入數(shù)據(jù)庫,當(dāng)緩存時間到了以后,再把內(nèi)存的數(shù)據(jù)寫入數(shù)據(jù)庫。這樣,即使再大的并發(fā)量,也不會再發(fā)生數(shù)據(jù)庫死鎖的問題了。

經(jīng)過初步的代碼修改和測試,發(fā)現(xiàn)修改完了以后就沒有這個問題了。

修改方法是,打開FUNCTION目錄下的c_html_js.asp文件,修改UpdateCountInfo函數(shù)為以下代碼即可。

代碼如下:

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

'如果當(dāng)前時間與上次保存計數(shù)值的時間差大于設(shè)定的時間間隔,則把計數(shù)值重新寫入數(shù)據(jù)庫

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

另外,默認(rèn)的Z-Blog留言評論是沒有用戶IP地址顯示的,通過一些修改,可以在留言中增加用戶IP地址前三位的顯示功能,具體實現(xiàn)方法如下。

修改c_system_lib.asp文件的Public Function MakeTemplate(strC)函數(shù),加入下面語句:

代碼如下:

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()函數(shù),將 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#>標(biāo)簽。

之后,文章評論就會出現(xiàn)評論者的IP地址欄,不過有個問題是,當(dāng)評論有人回復(fù)的是時候,只能留下最后一個回復(fù)者的IP地址。

更多信息請查看IT技術(shù)專欄

更多信息請查看CMS教程
易賢網(wǎng)手機(jī)網(wǎng)站地址:Z-Blog 留言評論顯示IP地址和性能優(yōu)化
由于各方面情況的不斷調(diào)整與變化,易賢網(wǎng)提供的所有考試信息和咨詢回復(fù)僅供參考,敬請考生以權(quán)威部門公布的正式信息和咨詢?yōu)闇?zhǔn)!
相關(guān)閱讀CMS教程

2025國考·省考課程試聽報名

  • 報班類型
  • 姓名
  • 手機(jī)號
  • 驗證碼
關(guān)于我們 | 聯(lián)系我們 | 人才招聘 | 網(wǎng)站聲明 | 網(wǎng)站幫助 | 非正式的簡要咨詢 | 簡要咨詢須知 | 加入群交流 | 手機(jī)站點(diǎn) | 投訴建議
工業(yè)和信息化部備案號:滇ICP備2023014141號-1 云南省教育廳備案號:云教ICP備0901021 滇公網(wǎng)安備53010202001879號 人力資源服務(wù)許可證:(云)人服證字(2023)第0102001523號
云南網(wǎng)警備案專用圖標(biāo)
聯(lián)系電話:0871-65099533/13759567129 獲取招聘考試信息及咨詢關(guān)注公眾號:hfpxwx
咨詢QQ:526150442(9:00—18:00)版權(quán)所有:易賢網(wǎng)
云南網(wǎng)警報警專用圖標(biāo)