日韩精品中文字幕一区二区-日韩精品中文字幕一区-日韩精品中文字幕视频-日韩精品在线一区二区三区-第一页在线-第一福利视频

當前位置: 首頁IT技術 → 實現長文章分頁和頁碼條顯示的經驗分享

實現長文章分頁和頁碼條顯示的經驗分享

更多

本文章是關于作者的一個小經驗心得,關于長文章分頁顯示思路及頁碼條顯示新思路 ,希望能給大家帶來幫助或啟發。

思路是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>"

熱門評論
最新評論
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字數: 0/500 (您的評論需要經過審核才能顯示)
主站蜘蛛池模板: 成年人免费在线观看 | 午夜不卡视频 | 国产精品视频一区二区三区 | 毛片免费在线观看 | 午夜精品免费 | 欧美成人精品激情在线观看 | 欧美不卡一区 | 九九热在线视频观看 | 网站av | 亚洲一级免费视频 | 91午夜理伦私人影院 | 久久精品av | 日韩国产一区二区 | 成年人免费在线观看 | 91久久久久国产一区二区 | 中文字幕在线播放视频 | 国产美女福利 | 黄色小视频在线 | 久久综合五月天 | 少妇高潮毛片 | 久久精品视频99 | 在线观看国产一区二区 | 午夜成人在线视频 | 一区二区三区不卡视频 | 亚洲专区一区 | 日韩毛片在线 | 国产精品久久久久久久久久久久久 | 91久久国产综合久久 | 中文毛片 | 国产三级在线播放 | 日本中文在线观看 | 日韩精品欧美 | 99热网站 | 日韩国产精品视频 | 日韩一区二区在线观看视频 | 色一区二区三区 | 亚洲第一av | 91免费在线看 | 精品一区在线 | 亚洲综合三区 | 亚洲精品视频在线播放 |