oracle分页数据显示,利用ASP实现Oracle数据记录的分页显示

作者：chinaitlab.com 出处：chinaitlab.com 更新时间：2008-08-07 责任编辑：seward

一、引言

通过浏览器访问数据量大的表时需要进行分页。ASP对数据库记录分页显示可以通过ADO对象集Recordset对象来实现。[@more@]Recordset具有以下几个用于分页显示的属性：

PageSize：每页显示的记录数。

PageCount：根据用户设定好的PageSize和表中的总记录数，系统自动算出总页数。RecordCount：表中的总记录数。

AbsolutePage：表示当前页码。如将AbsolutePage属性设为3，则当前记录移至第3页第1条(也就是第31条)。

知道Recordset具有这几个属性后，相信大家都觉得实现记录的分页显示是很简单的。先打开数据库及表，再设定好PageSize和AbsolutePage，最后将记录数据输出到浏览器，就可以大功告成。诚然，使用Access或SQL server作数据库时，就这么简单，因为这两种数据库都支持Recordset的这几个用于分页的属性。与Access或SQL server相比，Oracle数据库提供更好的安全性，并且在数据量极大的情况下性能占优，然而Oracle并不支持这些分页属性。本文将介绍一种利用ASP实现对Oracle数据记录分页显示的方法，使得Oracle用户能够轻松方便地实现记录分页显示。

二、实现过程分析

1、 建立数据源:

安装Oracle客户端软件，通过microsoft odbc for oracle驱动程序建立DSN如："DSN=servername;UID=user;PWD=password " 。

2、 建立数据表:

简单的个人资料表结构如下(表名为data)：

data：name，Varchar2；telephone，Number；email，Varchar2；

3、程序代码分析(在此只分析记录显示程序display.asp)：

个人资料表

//以下显示表头

个人资料表

编号

姓名

电话

E-mail

"" then

CurrentPageNumber=CLng(Request("CurrentPageNumber"))

end if

//因为默认页号从0开始，所以要将参数减1

CurrentPageNumber=CurrentPageNumber-1

//以下计算总的记录条数

TotalRrecord=0

While (not Rs.EOF)

Rs.MoveNext

TotalRecord=TotalRecord+1

Wend

//以下计算总页数TotalPageNumber

if (TotalRecord mod RecordsPerPage)=0 then

TotalPageNumber=(TotalRecordRecordsPerPage)

else

TotalPageNumber=((TotalRecordRecordsPerPage)+1)

end if

//如果输入页号参数小于0，则显示首页

If CurrentPageNumber<0 Then

CurrentPageNumber=0

end if

//如果输入页号参数大于总页数减1，则显示最后一页

if CurrentPageNumber>(TotalPageNumber-1) Then

CurrentPageNumber=(TotalPageNumber-1)

end if

//记录指针返回到第一个记录

Rs.movefirst

//以下让纪录指针越过输入页号以前的记录，走到当前页的第一个纪录

PASSNUMBER = CurrentPageNumber*RecordsPerPage

for i=0 to PASSNUMBER -1

Rs.movenext

next

INDEX = PASSNUMBER + 1

NUMBER = 1 //NUMBER为计数器

//以下显示当前页的表内容

While (not Rs.EOF)and (NUMBER <= RecordsPerPage)

%>

//编号

//姓名

//电话

//电子邮件

//以下表单实现页码导航