莴笋拼音:ASP分页最后一页错误，错误 '80020009'

错误 '80020009'
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
行 0
代码
<%
PageNO = Request.QueryString("PageNO")
if request("pageno")<>"" then
PageNO=request("pageno")
end if
PageSize = 35
rs.PageSize = PageSize
AllCount = rs.RecordCount
MaxPage = rs.PageCount
If rs.RecordCount > 1 Then
rs.MoveFirst
If PageNO = "" Then PageNO=1
If PageNO+1 < 2 Then PageNO=1
If PageNO+1 > MaxPage+1 Then PageNO = MaxPage
rs.AbsolutePage = PageNO

do while (not rs.eof) and i < PageSize
i=i+1
col="ffffff"
if i mod 4 =0 then
col="EEF5FC"
end if%>
<tr bgcolor=<%=col%>>
<td width="102"><div align="center" class="line20"><%=rs("s4")%></div></td>
<td width="72" bgcolor="<%=col%>"><div align="center" class="line20"><%=rs("s1")%></div></td>
<td width="79" bgcolor="<%=col%>">
<div align="center" class="line20"><%=rs("s2")%></div></td>
<td width="75" bgcolor="<%=col%>"><div align="center" class="line20"><%=rs("s3")%></div></td>
<td width="264" bgcolor="<%=col%>"><div align="left"></div>
<div align="left" class="line20"><%=rs("info")%></div></td>
</tr>
<%
rs.movenext
loop
end if
%>