怎麼把從數據庫中檢索的數據, 分頁

[saf9]

怎麼把從數據庫中檢索的數據, 分頁
我現在把數據檢索出來,用table在頁面上顯示,但條數太多
請問怎麼把它們份成几頁,然後 用上一頁,和下一頁來預覽

[孟子E章]

<% '*****************************************************************************************
'处理翻页 %>

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20" valign="top"><img src="../images/jian1.gif" width="20" height="20"></td>
<td><b>Current Page: <%=intPage%> / <%=rs.pagecount%>      
Total <% =rs.recordcount%> records</b>
<br></td></tr>
<tr><td align="center" colspan=2><b>Goto Page: </b>
<% dim pageField
pageField=int(rs.pagecount/10)

if pageField>0 then
Response.Write "<a href=index.asp?page=" & ((pageField-1)*10+9) & "><font size=3>上十页</font></a>"
end if
for i=pageField*10+1 to pageField*10+10
if i<=rs.pagecount then
if i=intpage then
response.write "<font size=4 color=red>" & i & "</font> "
else
Response.Write "<a href=index.asp?page=" & i & "><font size=4>" & i & "</font></a> "
end if
end if
next
if int(rs.pagecount/10)>pagefield then
Response.Write "<a href=index.asp?page=" & (PageField+1)*10+1 & "><font size=3>下十页</font></a>"
end if
%>

</td></tr></table>