陶瓷有什么优点:BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 17:19:24
我从数据库ACCESS中手动删除记录,就会出现
"BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
"这个错误.请问如何解决?还有不明白的就是,点击"最后一页"的时候无法显示.

<%
if not rs.bof then
rs.pagesize=10
if not isnumeric(Request("Page")) then
Page=1
else
page = cint(request("page"))
End if
if page = "" then page = 1
if page < 1 then page=1
if page >= rs.pagecount then page = rs.pagecount
rs.absolutepage = page
contentz=rs.pagecount
for i=1 to rs.PageSize

%>
........[略]
<%
rs.movenext
next
%>
<%end if%>
<%
if page=1 then
response.write "首页 | 前页 |"
else
response.write "<A Href=index.asp?page=1>首页 </a> |<a href=?page="&page-1&">前页</a> |"
end if
if page=rs.pagecount then
response.write "下页 | 最后一页 |"
else
response.write "<a href=?page="&page+1&">下页</a> |<a href=?page="&contentz&">最后一页</a> |"
end if
%></center>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

for i=1 to rs.PageSize

%>
........[略]
<%
rs.movenext
next

'修改成---------------------------------------

while not rs.eof

%>
........[略]
<%
rs.movenext
wend