叶子asp分页类是效率十分好一个分页类,但在最后的0.12版中还存在微小的bug,本文作者提供了两种修复方法供大家参考。下面学步园小编来讲解下叶子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怎么修复”的内容,希望对大家有用。更多资讯请关注学步园。学步园,您学习IT技术的优质平台!