ADODB.Field 错误 '***********'
ADODB.Field 错误 '***********'
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
代码：
<% dim rs
sql="select top 4 id,msg_name from book2 where msg_xs='1'"
set rs=MM_kingit_STRING.execute(sql)
%>
<% do while not rs.eof %>
<% for i=0 to 4%>
<tr>
<td height="21" align="left"><img src="images/kint_red.gif" width="4" height="6" /> <a
href="news.asp?id=<%=rs(0)%>"
target=_blank><%=rs(1)%></a></td>
<%rs.movenext%>
</tr>
<%next%>
<%loop%>
参考答案:<% dim rs
sql="select top 4 id,msg_name from book2 where msg_xs='1'"
set rs=MM_kingit_STRING.execute(sql)
if not rs.eof then
do while not rs.eof
%>
<tr>
<td height="21" align="left"><img src="images/kint_red.gif" width="4" height="6" /> <a
href="news.asp?id=<%=rs(0)%>"
target=_blank><%=rs(1)%></a></td>
<%rs.movenext%>
</tr>
<%
loop
end if
rs.close
set rs = nothing
%>