<tr>
<td background="images/index_08.jpg" width="299" height="100" alt="" valign="top"> <table width="100%" cellpadding="0" cellspacing="0" border="0">
<tr><td> </td></tr>
<!--#include file="conn.asp"--><%
set rs=server.CreateObject("adodb.recordset")
sql="select top 3 * from Feedback order by id desc"
rs.open sql,conn,1,1
while not rs.eof
%>
<tr>
<td width="37%" height="25"> </td>
<td width="56%" valign="top"><a href="showonewords.asp?airid=<%=rs("id")%>"><%=left(rs("Title"),13)%></a></td>
<td width="7%"> </td>
</tr><%
rs.movenext
wend
rs.close
set rs=nothing
%>
</table></td>
</tr>
<tr>
<td background="images/index_09.jpg" width="299" height="100" alt="" valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="20">
<tr><td> </td></tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 6 * from Feedback order by id desc"
rs.open sql,conn,1,1
rs.movenext
rs.movenext
rs.movenext
while not rs.eof
%>
<tr>
<td width="37%" height="25"> </td>
<td width="56%" valign="top" height="20"><a href="showonewords.asp?airid=<%=rs("id")%>"><%=left(rs("Title"),13)%></a></td>
<td width="7%"> </td>
</tr>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>
</table>
</td>
</tr>
当记录数少于3条的时候报错:
错误类型:
ADODB.Recordset (0x800A0BCD)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/g广远国际贸易/side.asp, 第 45 行
上面的程序如何修改就可以当记录数条数少于3条的时候不报错~
帮忙修改一下程序~
[此贴子已经被作者于2007-11-2 14:30:49编辑过]