1. 做一个简单的ASP分页程序
本程序主要用到Connection、RecordSet这两个对象，程序中的数据库为Access库，采用OLEDB方式连接库。
这个东西是作为菜鸟的我弄的一个东西.
你可以对这个东西不屑一顾.但是请记住: 菜鸟也有这个权利把自己的心得体会附注文字贡献出来.....当然,技术方面真的是好菜的..一些ASP中的比较正统的中规中矩的方法.我觉得这个东西可能对初学者有些帮助.......见笑了..
一个简单的分页教程：
<%
Setconn=Server.CreateObject("ADODB.Connection")
strcon="provider=microsoft.jet.oledb.4.0;datasource="&_
server.mappath("mdb.mdb")
conn.Openstrcon
Setrs=Server.CreateObject("ADODB.Recordset")
sql="select*fromtableorderbyiddesc"
rs.Opensql,conn,1
page=1'设置变量PAGE=1
rs.PageSize=5'每页显示记录数
ifNotIsEmpty(Request("Page"))then'如果PAGE已经初始化...
Page=CInt(Request("Page"))'接收PAGE并化为数字型赋给PAGE变量
ifPage>rs.PageCountthen'如果接收的页数大于总页数
rs.AbsolutePage=rs.PageCount'设置当前显示页等于最后页
elseifPage<=0then'如果page小于等于0
Page=1'设置PAGE等于第一页
else
rs.AbsolutePage=Page'如果大于零,显示当前页等于接收的页数
endif
Endif
Page=rs.AbsolutePage
%>
<%
Fori=1tors.PageSize
ifrs.EOFthen
ExitFor
endif'利用fornext循环依次读出记录
%>