ASP分页问题，请高手看看！！！

<%
classname=request.querystring("classname")
sql="select * from news where classname='"&classname&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1
Dim page_no
If request.querystring("page_no")="" Then
page_no=1
Else
page_no=CInt(request.querystring("page_no"))
End If
rs.pagesize=5
rs.absolutepage=page_no
i=rs.pagesize
do while not rs.eof And i>0
i=i-1
%>
<img src="/imge/article_common.gif"><a href="news.asp?id=<%=rs("id")%>"><%=rs("title")%></a> <p>
<%
rs.movenext
Loop
response.write"请选择页码："
For i=1 To rs.pagecount
If i=page_no Then
response.write(i&" ")
Else
response.write("<a href='list.asp?page_no=&q

ASP分页代码问题！高手过来看看？ asp分页问题~~~~请高手帮忙 ASP分页问题,求高手 asp分页问题？高手请进？ ASP 分页问题，高手请进 ASP制作网页分页的一个问题,请高手帮忙 asp分页的问题，请高手指点。 急！ ASP分页问题错误大家看看 ASP搜索分页问题~~高手看看呀~看看哪错了呀 ASP内容分页问题请教高手