如何让里面的<img src="images/3.GIF">只在当天显示最新，余下6天的信息没有<img src="images/3.GIF">显示

<%Set OBJConn = Server.CreateObject("ADODB.Connection")
OBJConn.Open "bj","sa","123"
sersql="select gzlx,sj from gzlx where sj>=convert(varchar(10),getdate()-7) order by sj desc"
Set rs=OBJConn.Execute (sersql)
%>
<%
if rs.eof then
response.write("")
else
do while not rs.eof%>

<tr>
<td><%=rs("gzlx")%></td>
<font color="#808080"></font><td><%=rs("sj")%></td>
<font color="#808080"></font>
<img src="images/3.GIF">
<br>
<%
rs.Movenext
loop
response.write("")
end if
%>
<br>
<%
OBJConn.Close
Set rs = Nothing
Set OBJConn = Nothing
%>

是的是的，我研究了半天了

老师这要怎么写呀

还是不行错误类型：
ADODB.Recordset (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
/index.asp, 第 336 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页：
GET /index.asp

时间：
2007年5月15日, 12:06:12

详细信息：
Microsoft 支持

[此贴子已经被作者于2007-5-15 14:34:59编辑过]