<% Set rs= Server.CreateObject("ADODB.Recordset")
sql="select top 10 * from news order by id desc"
rs.open sql,conn,1,1
rs.movenext()
if rs.eof and bof then
response.Write("没有找到相关新闻")
else
do while not rs.eof
%>
<a href="show_news.asp?id=<%=rs("id")%>"><%=rs("title")%></a><BR>
<%rs.movenext()
i=i+1
loop
end if
%>

这段程序不会判断，如果没有第二条记录的话，我想他输入“没有找到相关新闻”
现在的问题是如果没有第二条记录，他直接空白，什么也没有，哪位会的帮忙改下，万分感谢！！！！！！！

[此贴子已经被作者于2007-6-13 21:54:09编辑过]

这个程序运行没有错误？

他不会显示“没有找到相关新闻啊

<% Set rs= Server.CreateObject("ADODB.Recordset")
sql="select top 10 * from news order by id desc"
rs.open sql,conn,1,1
rs.movenext()
if rs.eof and bof then
response.Write("没有找到相关新闻")
else
do while not rs.eof
%>
<a href="show_news.asp?id=<%=rs("id")%>"><%=rs("title")%></a><BR>
<%rs.movenext()
i=i+1
loop
end if
%>
把红字的部分删掉试试看。

现在可以了谢谢班竹啦！！！