文章內容

Z-blog技巧之留言板改成滔滔

發布時間: 2012/9/15 17:45:07

15378720700 QQ：916656313 河南億恩科技有限公司，專注IDC服務13年，華中地區最大IDC服務商。
新機房優惠活動正在進行中......期待您的加入。

找到文件./FUNCTION/c_system_lib.asp，搜索”定義TGuestBook類”，在這一整段里面，搜索”guestbook.asp”，并替換成”taotao/”,如果不想靜態化就替換成”taotao.asp”

大體上替換后的代碼是這樣的：

[code=vb] j=objRS.PageCount
If j>0 Then
Dim a,b,s,t,intNowPage,strPageBar
s=ZC_BLOG_HOST & "taotao/"
t=""
intNowPage=intPage

strPageBar=GetTemplate("TEMPLATE_B_PAGEBAR")
strPageBar=Replace(strPageBar,"<#pagebar/page/url#>",s)
strPageBar=Replace(strPageBar,"<#pagebar/page/number#>",ZC_MSG285)
Template_PageBar=Template_PageBar & strPageBar

If j>ZC_PAGEBAR_COUNT Then
a=intNowPage
b=intNowPage+ZC_PAGEBAR_COUNT
If a>ZC_PAGEBAR_COUNT Then a=a-1:b=b-1
If b>j Then b=j:a=j-ZC_PAGEBAR_COUNT
Else
a=1:b=j
End If
For i=a to b

s=ZC_BLOG_HOST & "taotao/"& t &"page/"& i &".html"
If i=1 Then
s=ZC_BLOG_HOST & "taotao/"
End If
strPageBar=GetTemplate("TEMPLATE_B_PAGEBAR")
If i=intNowPage then
Template_PageBar=Template_PageBar & "" & i & ""
Else
strPageBar=Replace(strPageBar,"<#pagebar/page/url#>",s)
strPageBar=Replace(strPageBar,"<#pagebar/page/number#>",i)
Template_PageBar=Template_PageBar & strPageBar
End If

Next

s=ZC_BLOG_HOST & "taotao/"& t &"page/"& j &".html"
If j=1 Then
s=ZC_BLOG_HOST & "taotao/"
End If

strPageBar=GetTemplate("TEMPLATE_B_PAGEBAR")
strPageBar=Replace(strPageBar,"<#pagebar/page/url#>",s)
strPageBar=Replace(strPageBar,"<#pagebar/page/number#>",ZC_MSG286)
Template_PageBar=Template_PageBar & strPageBar

If intNowPage=1 Then
Template_PageBar_Previous=""
Else
Template_PageBar_Previous=""&ZC_MSG156&""

End If

If intNowPage=intPageCount Then
Template_PageBar_Next=""
Else
Template_PageBar_Next=""&ZC_MSG155&""
End If[/code]

如果你不想靜態化，去你的根目錄，將guestbook.asp改名為taotao.asp，任務完成。

如果你準備靜態化，在httpd.ini中加入如下代碼：
 #滔滔靜態化 RewriteRule /taotao /guestbook\.asp RewriteRule /taotao/page/(.*).html /guestbook\.asp\?page=$1 RewriteRule /taotao/ /guestbook\.asp

本文出自：億恩科技【www.23lll.com】

服務器租用/服務器托管中國五強！虛擬主機域名注冊頂級提供商！15年品質保障！--億恩科技[ENKJ.COM]