如何修复叶子ASP分页类Bug

本篇内容介绍了“如何修复叶子ASP分页类Bug”的有关知识,在实际案例的操作过程中,不少人都会遇到这样的困境,接下来就让小编带领大家学习一下如何处理这些情况吧!希望大家仔细阅读,能够学有所成!

鹿泉网站建设公司创新互联,鹿泉网站设计制作,有大型网站制作公司丰富经验。已为鹿泉上千多家提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的鹿泉做网站的公司定做!

1'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条=___=

2IfiPageIndex>1AndiPageIndex=iPageCountAnd(iRecordCountModiPageSize=1)Then

3Rs.AbsolutePosition=(iPageIndex-1)*iPageSize

4Else

5Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

6EndIf

方法一:使用静态游标(即oConn,1,1改为oConn,3,1)viewsourceprint?1SetRs=Server.CreateObject("Adodb.RecordSet")

2Rs.Open"SELECT"&sField&"FROM"&sTable&""&sCondition&""&sOrderBy,oConn,3,1,&H0001

3'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条

4Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

叶子ASP分页类Bug怎么修复

方法二:viewsourceprint?1SetRs=Server.CreateObject("Adodb.RecordSet")

2Rs.Open"SELECT"&sField&"FROM"&sTable&""&sCondition&""&sOrderBy,oConn,1,1,&H0001

3'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条=___=

4IfiPageIndex>1andiPageIndex=iPageCountThen

5Rs.Move(iPageIndex-1)*Clng(iPageSize)

6EndIf

7Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

“如何修复叶子ASP分页类Bug”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识可以关注创新互联网站,小编将为大家输出更多高质量的实用文章!


当前名称:如何修复叶子ASP分页类Bug
网页路径:http://scyanting.com/article/gsgseh.html