我初学的ASP，N多的东西搞不懂，编了一个类似留言本的东西，其他功能都实现了，最后在做分页的时候出了问题，实现部分的代码如下，请各位高人帮我看看到底哪里出了错。
当有多页记录，按“下一页”这个链接时，跳不到相应的页面，老是在第一页。而且在显示“当前页”/“总页数”这个地方，总是显示”-1/N（N是实际总页数）“。为什么当前页也就是这个第一页会是”-1”啊？
“<%
const MaxPerPage=3
dim totalPut '总记录数
dim CurrentPage '当前页
dim TotalPages '总页数
%>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from mydata order by id desc"
rs.open sql,conn,1,3
%>
......
<%
rs.pagesize=maxperpage '设置每页记录数
totalPut=rs.recordcount '返回记录总数
pgno=request.QueryString("page")'以下判断第几页
if pgno="" or int(pgno)<=1 then
CurrentPage =1 '当前页
else
CurrentPage =pgno
if CurrentPage>rs.pagecount then
CurrentPage=rs.pagecount
end if
end if
dim i
i=0
%>
<% rs.absolutepage=CurrentPage
do while not rs.EOF
%>
......
<% i=i+1
if i>=MaxPerPage then exit do
rs.MOVENEXT
loop
%>
......
<%
dim pageno
if rs.absolutepage>1 then
pageno="<a href=?page="& rs.absolutepage-1 & ">上一页</a>" & " "
else
pageno="上一页" & " "
end if
if rs.absolutepage<rs.pagecount then
pageno=pageno & "<a href=?page=" & rs.absolutepage+1 & ">下一页</a>" & " "
else
pageno=pageno & "下一页" & " "
end if
pageno=pageno & " 第<strong><font color=red>"&rs.absolutepage&"</font>/"&rs.pagecount&"</strong>页"&" <b>"&totalput&"</b>条记录 <b>"&maxperpage&"</b>条记录/页"
response.write pageno
%>”
