关于叶子ASP分页类Bug两种修复方法

  • 时间:
  • 浏览:0
  • 来源:5分排列3官网平台_5分排列3网投平台_5分排列3投注平台_5分排列3娱乐平台
作者:hhyy0029 hihi 来源:用户投稿 浏览: 2012-3-12 11:24:59 字号:大 中 小

[摘要]叶子asp分页类是时延十分好另一个分页类,但在最后的0.12版中还位于微小的bug,本文作者提供了本身修复妙招 供亲戚亲戚许多人参考。

  废话太多说,直接进入主题:

  叶子分页类v1.2中,190行:

源码:

'此处是为了修正access记录多或者最后一页不能三根记录则报Eof的bug,坏处却说最后一页会显示2条=___=

If iPageIndex > 1 And iPageIndex = iPageCount And (iRecordCount Mod iPageSize = 1) Then

Rs.AbsolutePosition = (iPageIndex - 1) * iPageSize

Else

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

End If

  此处叶子每该人虽进行了修改,但还是有小小的遗憾,当最后页不能1条记录时,在显示的就让 会显示为两条。

修改:

  妙招 一:使用静态游标(即oConn,1,1改为oConn,3,1)

Set Rs = Server.CreateObject ("Adodb.RecordSet")

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

'此处是为了修正access记录多或者最后一页不能三根记录则报Eof的bug,坏处却说最后一页会显示2条=___=

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

  妙招 二:

Set Rs = Server.CreateObject ("Adodb.RecordSet")

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

'此处是为了修正access记录多或者最后一页不能三根记录则报Eof的bug,坏处却说最后一页会显示2条=___=

If iPageIndex >1 and iPageIndex = iPageCount Then

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

End If

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

  按就让 面 法修改后,一切正常。

  作者:HHYY,2012-3-11,QQ:44239810000,Email:yywfte999@qq.com。

sssss
Tags: 叶子ASP分页类  
责任编辑:mozi