<%
set rs=Server.CreateObject("adodb.Recordset")
sql="SELECT * FROM news where cat_id=62 and isimg=1 and images<>'' ORDER BY news_id DESC"
rs.open sql,conn,1
i=0
for i= 1 to 4
if rs.eof then exit for
%>
<%set rs=Server.CreateObject("adodb.Recordset")
sql="SELECT * FROM news where cat_id in (57,58,59,60,62,64,65,66) and passed=0 ORDER BY news_id DESC"
rs.open sql,conn,1
i=0
for i= 1 to 18
if rs.eof then exit for
%>
<%
rs.movenext
next
%>
<%set rs=Server.CreateObject("adodb.Recordset")
sql="SELECT * FROM news where cat_id in (57,58,59,60,62,64,65,66) ORDER BY news_id DESC"
rs.open sql,conn,1
i=0
for i= 1 to 15
if rs.eof then exit for
%>