首先，来看看效果 ！

看看功能：分页程序首先读取每页预置的记录条数，在此是5条，其它将在下页中显示，同时提示当前页数、总页数、总记录数，当显示的页数为第一页时，“首页”、“上一页”链接失效，当显示的页数为最后页时，“下一页”、“尾页”链接失效。

接下来，以实例的方式告诉大家怎么一步步的做出这种分页效果。

首先，数据库中字段record_info存在于info表中（实例下载中有数据库），先链接数据库并将一个记录集打开，以下代码：

<%
Set conn=Server.CreateObject("Adodb.Connection")
connstr="provider=Microsoft.JET.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")
conn.open connstr
Set rs=Server.CreateObject("Adodb.Recordset")
sql="Select * from info"
rs.open sql,conn,1,1
%>

这段代码不详解，相信初入门的都会，具体的解释可以看看《手把手教你用ASP做留言本》教程，

接下来这是分页中比较重要的部分，了了三行而已：

<%
rs.pagesize=5
curpage=Request.QueryString("curpage")
rs.absolutepage=curpage
%>

第二句：
rs.pagesize=5，这个什么意思呢？它就是在Recordset对象中的一个内置属性，它的作用是指定每页的记录条数，设置为5时，每5条记录放在一起成一页，比如实例中共有21条记录，那么，使用rs.pagesize分页后，这21条记录将分成5页进行显示。

[1] [2] [3]  下一页