asp中ADODB.Field (0x80020009)奇怪错误

[steryzone]

错误类型：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

出现了上面说的错误，但是我确定我数据库是有数据的

Set rs = server.CreateObject("adodb.recordset")
sql = "select * from saga_rights"
rs.open sql,conn,1,1

这是我的连接数据库的语句。。。

但是为什么不行的呢？奇怪

[layers2323]

把你sql放到对应数据库中运行下。

[sy_binbin]

Set rs = server.CreateObject("adodb.recordset")
sql = "select * from saga_rights"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
'有数据
else
'没数据
end if

[steryzone]

[Quote=引用 2 楼 sy_binbin 的回复:]
Set rs = server.CreateObject("adodb.recordset")
sql = "select * from saga_rights"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
'有数据
else
'没数据
end if
[/Quote]
无论我怎样用If-Else测试有没有数据，都没有提示，都只会跳到
错误类型：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

这个页面来

[sy_binbin]

不可能吧！你确定错误就是这段代码吗？？

[layers2323]

那你最好把详细代码贴上来。

[steryzone]

Sub Edit()
dim rs2,sql
dim id
id = request("id")
Set rs2 = server.CreateObject("adodb.recordset")
sql = "select * from saga_rights"
rs2.open sql,conn,1,1
if not(rs.bof and rs.eof) then 
 response.Write("have") 
else 
response.Write("no")
end if
End Sub

代码就在这了
我也很郁闷为什么会这样，明明是简单的一个例子，为什么会这样字呢，无论怎样都没有‘have’或‘no’显示

[sy_binbin]

Sub Edit()
dim rs2,sql
dim id
id = request("id")
Set rs2 = server.CreateObject("adodb.recordset")
sql = "select * from saga_rights"
rs2.open sql,conn,1,1
if not(rs.bof and rs.eof) then
response.Write("have")
else
response.Write("no")
end if
End Sub


数据集都不一样，你说能判断的出来吗？？

[Rotel-刘志东]

数据集set rs2=server.createobject("adodb.recordset")
if not(rs.eofand rs.bof) then
rs2和rs数据集不同，就会报BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录