asp上一页,下一页 怎么实现

比如我的数据库有100条记录,我就是想每页显示10条,页就是分10页显示.
怎么实现?我现在是这样的(每页都有页码,但如果有100页就不可能都显示了),如果是下一页,下一页代码应该怎么改

共有
<% =rst.recordcount %>
本书</span> <span class="STYLE2"> 共
<% = rst.pagecount%>
页
当前页次：
<% = currentpage %>
/
<% = rst.pagecount%>
分页：
<%
for i = 1 to rst.pagecount
if i=cint(currentpage) then
%>
[<font color="red">
<% = i %>
</font>]
<%else%>
[<a href="book.asp?currentpage=<% = i %>">
<% = i %>
</a>]
<%
end if
next
%>

相关了解……