如何修复叶子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”的内容就介绍到这里了，感谢大家的阅读。如果想了解更多行业相关的知识可以关注亿速云网站，小编将为大家输出更多高质量的实用文章！