点到分页的最后一页出现

ADODB.Field 错误 '80020009'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。


<%
for i=1 to rs.pagesize
if rs.eof then
exit for
end if
%>
<tr align="center"><td><%=rs("xs_user") %>&nbsp;</td><td><%=rs("xs_xh") %>&nbsp;</td><td><%=rs("xs_xb")%>&nbsp;</td><td><%=rs("xs_nl") %>&nbsp;</td><td><%=rs("xs_nz")%>&nbsp;</td><td><%=rs("xs_lxtime")%>&nbsp;</td><td><%=rs("xs_bytime")%>&nbsp;</td>
</tr>
<%
rs.movenext
next
%>
</table><% end if %>
<%
if page<>1 then %>
<a href=xsqkcx.asp?d=add&xs_nj=<%=rs("xs_nj")%>&xs_zy=<%=rs("xs_zy")%>&xs_bj=<%=rs("xs_bj")%>&page=1>首页</a>
<a href=xsqkcx.asp?d=add&xs_nj=<%=rs("xs_nj")%>&xs_zy=<%=rs("xs_zy")%>&xs_bj=<%=rs("xs_bj")%>&page=<%=(page-1)%>>上一页</a>
<%end if
if page<>rs.pagecount then %>
<a href=xsqkcx.asp?d=add&xs_nj=<%=rs("xs_nj")%>&xs_zy=<%=rs("xs_zy")%>&xs_bj=<%=rs("xs_bj")%>&page=<%=(page+1)%>>下一页</a>
<a href=xsqkcx.asp?d=add&xs_nj=<%=rs("xs_nj")%>&xs_zy=<%=rs("xs_zy")%>&xs_bj=<%=rs("xs_bj")%>&page=<%=rs.pagecount%>>尾页</a>
<%
end if
%>
第<%=page%>页/共有<%=rs.pagecount%>页