1. 论坛系统升级为Xenforo,欢迎大家测试!
    Dismiss Notice

ASP判断问题

Discussion in '后端开发' started by 阿达, May 1, 2007.

  1. 阿达

    阿达 New Member

    Joined:
    Dec 6, 2005
    Messages:
    54
    Likes Received:
    0
    点到分页的最后一页出现

    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%>页