這兩天利用空閒時間編程序，琢摩了一下關於長文章分頁以及頁碼條的簡單實作方法。
想法是VBSCRIPT的。
CurrentPage=Request.QueryString("page")
'CurrentPage是目前頁面的意思
PageCount = Int(Len(Content)/SIZE) + 1
'Content是長文章內容
'SIZE是每一頁顯示字數
'PageCount是最後一頁的頁碼
START=Cint((CurrentPage-1)*SIZE+1)
'START是每一頁的啟始字數
If START<1 Then START=1
Content=Mid(Content,START,SIZE)
'以上截取出來每一頁的文字
'下面是顯示頁碼條，胡想的，不過挺簡單的，也挺實用。 。 。我覺得用於一般的分頁夠了。
'PAGEBAR_COUNT的意思是每次顯示多少頁碼，不太準的，因為我除二取整了（咳，差不多就行了，呵呵）
PageBar="<br/><a href="""&FileName&"?act=View&id="&ID&"&Page=1"">[<<]</a>"
For i=CurrentPage-Cint(PAGEBAR_COUNT/2) to CurrentPage+Cint(PAGEBAR_COUNT/2)
If i>0 and i<=PageCount Then PageBar=PageBar&"<a href="""&FileName&"?act=View&id="&ID&"&Page="&i&""">["&i&"]</a>"
Next
PageBar=PageBar&"<a href="""&FileName&"?act=View&id="&ID&"&Page="&PageCount&""">[>>]</a>"
來源：Sipo Blog
http://www.dc9.cn/post/272.html