条件语句调试，加了条件设置后页面变乱
sub mynews(a,b)
        response.Write("<table width=96% border=0 cellspacing=0 cellpadding=0>")
set rs=server.CreateObject("adodb.recordset")
sql="select top 9 * from yatype where yaType=2 and fromid="&a&"  order by myorder desc, id"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
        response.Write("<tr>")
        response.Write("<td class=3h><img src=images/5ice.gif width=5 height=5 hspace=5>")
        response.write("<font color=#006600>【<a target=_blank href=article.asp?ntype="&rs("fromid")&"&fromid="&rs("id")&" >"&rs("typename")&"</a>】</font>")

set rst=conn.execute("select top 1 * from yalist where yaType=2 and ntype="&rs("id")&" order by id desc")
//"&rs("id")&"中的id是大部门分栏目的编号，order by id desc中的id是文章序号
if now()-rst("nEditTime")<=3 then 
    response.Write("<img src=images/news.gif width=28 height=11>") 
end if
rst.close
set rst=nothing

response.Write("</font></td>")
response.Write("</tr>")
rs.movenext
loop
end if

rs.close
set rs=nothing
        response.Write("</table>")
end sub

上个帖子有人说我没写清楚，这次的需求我写明白一些

1.不加红色代码部分，能实现的效果：正常

大部门                 一排显示3个大部门及相关分栏目，由后面代码控制
【分栏目1】new图片
【分栏目1】new图片
【分栏目1】new图片

2.加了红色代码部分，现实的效果不正常，虽然能实现if now()-rst("nEditTime")<=3 然后显示new图片的效果，但是每排显示部门的数量以及宽度、长度等全部变乱，不知道如何调试

3.需求就是：如果某个部门的分栏目中有新的文章发表并且发表时间小于或等于现在的3天，均在分栏目后加上一个new的标志图片

PS：有部分部门的分栏目中没有文章，所以第二个搜索数据查询语句返回内容为空
谢谢

------解决方案--------------------
if not rst.eof then
  if now()-rst("nEditTime")<=3
   response.Write("<img src=images/news.gif width=28 height=11>") 
  end if
 end if