飘渺之梦

'百万数据超强分页类~
'比传统分页提高速度100倍
'只使用 “select * from xxxx”格式的查询语句
'使用方法：把这个文件 include 到你要进行分页的页面
' Dim Pl 定义变量，任意定义
' Set Pl = New AoaobPage 建立类的实例
' Pl.pagesize = 25 '每页显示个数
' Pl.SetPageTag = "id" '这是所有数据不会重复的数据库字段，一般为主键
' Pl.getconn = Db.Conn '这是数据库链接对象，根据自己的情况定义。
' Pl.getsql = Sql
' set Rs = Pl.getrs()'返回分页数据集
' For i=1 to 25
' If Rs.Eof Then Exit For
' ......
' Next
' set Pl = Nothing
'版权所有 http://www.aoaob.com 欢迎转载~
'联系邮件 webmaster@aoaob.com...

阅读全文...