。。。
<td align="center">
<%
dim restr
dim rers
dim title
dim reply_num
title=bbs_scrs("title")
restr="select * from bbs_reply where pre_title='"&title&"'"
set rers=server.CreateObject("adodb.recordset")
rers.open restr,conn,3,3
reply_num=rers.recordcount
if not rers.eof and not rers.bof then
%>
<% if reply_num=0 then %>
<font size="3">0</font>
<% else %>
<font size="3"><%=reply_num%></font>
<% end if %>
<%
rers.close
set rers=nothing
end if
%>
。。。。。。。。
以上是小鸟一个论坛程序的部分代码，我想让无回复时显示回复数为0，但是无回复时不显示0，为什么嘞？谢谢

if not rers.eof and not rers.bof then
%>
<% if reply_num=0 then %>
<font size="3">0</font>
<% else %>
<font size="3"><%=reply_num%></font>
<% end if %>
<%
rers.close
set rers=nothing
end if
如果没有回复，红色代码就不会执行，又怎么能显示？

reply_num=rers.recordcount
response.write(reply_num)
rers.close
set rers=nothing

没必要去判断是否有回复,recordcount是统计记录数的,没有时reply_num=rers.recordcount自然就是零

哦 这样啊 谢谢以上几位前辈