<% set rs_news=server.createobject("adodb.recordset") sqltext="select top 42 * from News where online=true and now()=PubDate and tpxw='1' order by uup desc,Pubdate desc" rs_news.open sqltext,conn,1,1 %> <%row_count=1 %> <% Do While Not rs_news.EOF%> <%if row_count mod 3 <>0 then%> <%end if%> <% if row_count mod 3 =0 then%> <%end if%> <% rs_news.MoveNext row_count=row_count+1 Loop rs_news.close %>