论坛交流
首页办公自动化| 网页制作| 平面设计| 动画制作| 数据库开发| 程序设计| 全部视频教程
应用视频: Windows | Word2007 | Excel2007 | PowerPoint2007 | Dreamweaver 8 | Fireworks 8 | Flash 8 | Photoshop cs | CorelDraw 12
编程视频: C语言视频教程 | HTML | Div+Css布局 | Javascript | Access数据库 | Asp | Sql Server数据库Asp.net  | Flash AS
当前位置 > 文字教程 > asp教程
Tag:入门,文摘,实例,技巧,iis,表单,对象,上传,数据库,记录集,session,cookies,存储过程,注入,分页,安全,优化,xmlhttp,fso,jmail,application,防盗链,stream,组件,md5,乱码,缓存,加密,验证码,算法,ubb,正则表达式,水印,,日志,压缩,url重写,控件,函数,破解,触发器,socket,ADO,初学,聊天室,留言本,视频教程

长文章分页显示思路及页码条显示新思路

文章类别:asp | 发表日期:2008-10-5 20:46:53

这两天利用空闲时间编程序,琢摩了一下关于长文章分页以及页码条的简单实现方法。

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

视频教程列表
文章教程搜索
 
Asp推荐教程
Asp热门教程
看全部视频教程
购买方式/价格
购买视频教程: 咨询客服
tel:15972130058