RASSEGNA STAMPA
<%
'Rassegna stampa
Caricamento_Notizie notizie, notizie_count, 0, 0, " and T.CDTAB1 = 'RASS'"
tmp_anno = 0
if (notizie_count > 0) then
for i = 0 to notizie_count - 1
notizie_anno = notizie(i, 10)
notizie_indice = notizie(i, 0)
notizie_immagine = notizie(i, 4)
notizie_titolo = notizie(i, 6)
notizie_descrizione = notizie(i, 7)
if (notizie_anno <> tmp_anno) then
tmp_anno = notizie_anno
%>
- <%=cstr(notizie_anno)%>
<%
end if
%>
-
<%
fine = false
if (i < notizie_count - 1) then
if (notizie(i + 1, 10) <> tmp_anno) then fine = true
end if
if (i = notizie_count - 1) then fine = true
if fine then
%>
<%
end if
next
end if
%>
