<% sql="select top 6 * from news order by id desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 %> <% do while not rs.eof %>
&id=<%=rs("id")%>"><%=left(rs("title"),16)%><% if DateDiff("d",rs("date"),date()) <= 7 then%><% end if%>
<%=rs("date")%>
<% j=j+1 rs.movenext loop %>
 
<% sql="select * from products where type<>19" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 temp=1 %> <% do while not rs.eof %> <% rs.movenext loop %>