|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
这两天利用空闲时间编程序,琢摩了一下关于长文章分页以及页码条的简朴实现方式。 思路是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>" 返回类别: 教程 上一教程: FSO操作示例 下一教程: 将ASP纪录集输出成N列表格的方式 您可以阅读与"长文章分页显示思路及页码条显示新思路"相关的教程: · 用ASP实现长文章用分页符来分页显示 · 1栏分页显示(附显示的形式前页,后页) · ASP中关于帖子分页显示的基本方式 · 一个超强通用的分页显示函数 · ADO存取数据时如何实现留言记录的分页显示 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |