Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

ADODB.Recordset 错误 '800a0bcd'

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

/Muti E book/showbook.asp，行78

下面是简单的代码:


set rs=server.createobject("adodb.recordset")
sql="select * from lyb where admin='"&username&"' order by 时间 desc"
rs.open sql,conn,1,3

rs.pagesize=20

pageno=cint(request("pageno"))

rs.absolutepage=pageno

上面的代码,如果一到rs.absolutepage=pageno就会出现以上的错误提示,如果我把代码改成:
set rs=server.createobject("adodb.recordset")
sql="select * from lyb where admin='"&username&"' order by 时间 desc"
rs.open sql,conn,1,3

'''''添加此句之后一些正常
if rs.eof and rs.bof then
rs.close
response.write "No Record!"
response.end
end if

rs.pagesize=20

pageno=cint(request("pageno"))

rs.absolutepage=pageno


如果添加个IF语句,则一切正常显示,这个问题困扰了我很常时间了,请大家帮我解决解释一下,我不明白啊!~

也可以,也没有毛病,但按道理不用加

if rs.eof and rs.bof then
rs.close
response.write "No Record!"
response.end
end if

这个语句也应该没有问题!为什么?

绝对没有空,呵呵,我检查过,也用查询语言试验过,有N条记录!

你给我启发了,看来还是记录为空的问题,可能编写保存后IIS没有刷新,显示的结果和上次的一样,误导我了!

谢谢大家!