"BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除" 问题求助 在线等!!!
今天碰到了这样一个问题:
ADODB.Field 错误 '80020009'
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/dd.asp,行 0
可查询语句输出是却正确的,这说明记录集是非空的
可是,为什么总是提示出现这样的错误呢,晕
下面是asp代码:
***************************************************
<%
dim rs,sql
set rs = Server.CreateObject("ADODB.RecordSet")
sql="select * from mainclass"
rs.open sql,conn,1,1
%>
<ul>
<%
'if not rs.eof then '如果主类非空
while not(rs.bof or eof) '外层循环
%>
<li><span><%=rs("ClassName")%></span>
<%
dim rs1,sql1
set rs1 = Server.CreateObject("ADODB.RecordSet")
sql1="select * from childclass where ParentID="&rs("ID")
rs1.open sql1,conn,1,1
%>
<ul>
<%
'if not rs1.eof then '如果子类非空
while not(rs1.bof or rs1.eof) '内层循环%>
<li><a href="2.htm"><%=rs1("ChildName")%></a></li>
<%
rs1.movenext
wend '内层循环结束
rs1.close
set rs1=nothing
'else '如果子类为空
'response.Write "child no matches"
end if
%>
</ul>
</li>
<%
rs.movenext
wend '外层循环结束
rs.close
set rs=nothing
'else '如果主类为空
response.Write "mian no matches"
'end if
%>
</ul>