类代码 [ 保存 ]
<style>
body{ font-size:12px; color:#000000;}
a, a:link, a:visited{font-size:12px; color:#333333; text-decoration:none;}
a:hover, a:active{font-size:12px; color:#666666; text-decoration:underline;}
</style>
<%
\'\'************************************************************************
\'\'使用思路方法
\'\'************************************************************************

conn = server.createObject(\"adodb.connection\")
conn.open \"driver={microsoft access driver (*.mdb)};dbq=\" & server.Mappath(\"pages.mdb\")

\'#############类样例#################
\'创建对象
Set mypage= xdownpage
\'得到数据库连接
mypage.getconn=conn
\'sql语句
mypage.getsql=\"select * from test order by id\"
\'设置每页记录条数据为5条
mypage.pagesize=5
\'返回Record
rs=mypage.getrs

\'显示数据
Response.Write(\"<br/>\")
for i=1 to mypage.pagesize
\'这里就可以自定义显示方式了
not rs.eof then
response.write rs(0) & \"&nbsp;&nbsp;\"&rs(1)&\"<br/>\"
rs.movenext

exit for
end
next

\'显示分页信息这个思路方法可以在 rs=mypage.getrs以后,可在任意位置可以多次
mypage.showpage
%>