<%
if rs.eof then exit for
rs.movenext
if rs.eof then exit for
%>
<%
next
%>
<%
rs.close
set rs=nothing
end if
%>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 4 * from product where isnew=1 order by pdate desc"
rs.open sql,conn,1,1
if not rs.eof then
%>