下面这段代码是1.asp包含在index.asp当中，我希望每页显示5个数据库的内容，但是循环读出来的5个内容都是数据库的同一条信息，希望帮我看看！
<%
dim page,i,ks
page = Clng(Request("usrpage"))
rs.PageSize = 5
If page <1 Then page = 1 end if
If page > rs.PageCount Then page = rs.PageCount end if
rs.AbsolutePage = page
%>

<% if not rs.bof then %> <% for i=1 to rs.pagesize%>       onMouseOver="this.style.filter='alpha(opacity=100)'" onmouseout="this.style.filter='alpha(opacity=70)'">   <%=a_text%> 站点名称:<%=a_name%>...     <%=a_url%>       下页 <% rs.movenext If rs.eof Then Exit For next %> <% end if %>

	<% If page <> 1 Then %> 最前一页 上一页 <% end if %> <% if page <> rs.PageCount Then %> 下一页 最后一页 <% end if %> 当前为第<%= page %>页 总共有<%= rs.pagecount %>页	<% if not rs.bof then %> <%For ks = 1 To rs.PageCount%> Selected<%End If%>>第<%=ks%>页 <%Next%>             <% end if %>

<%
rs.close
set rs = nothing
conn.close
set conn = nothing
%>