<% dim EventoSim, NumNotEsq 'EventoSim define se tem janela de eventos, NumNotEsq define nº de notícias na coluna EventoSim = false NumNotEsq = 3 if EventoSim then NumNotEsq = 2 %>

<% end if dim j for j=0 to NumNotEsq%>

< <%=Nsecao(j)%> >

<%=data(j)%>

<%=tit(j)%>

<% if img(j) <> "" then %>

<% end if %>

<%=chm(j)%>

<%if j

<% end if %>

<%next%>

<%if codigoG1<>"" then%>

<%if imgG1 <> empty then%>

<% end if %>

<%=titG1%>

<%=chamG1%>

<%end if%> <%for j=NumNotEsq+1 to 8%>

< <%=Nsecao(j)%> >

<%=data(j)%>

<%=tit(j)%>

<% if img(j) <> "" then %>

<% end if %>

<%=chm(j)%>

<%if j<8 then%>

<% end if %>

<%next%>