|
<%
DIM RS,CN
CALL Menu()
%> |
 Notícies |
<%
CALL OBRE_CONEXIO
CONSULTA="SELECT * FROM CicloTimes AS C,Familia_Mes_Noticies AS F LEFT JOIN MesNoticies AS M ON M.IdFamilia=F.IdFamilia WHERE C.Idciclotimes=M.idciclotimes AND M.IdCicloTimes=" & Session("Id_Ciclotimes") & " AND M.Visible='on' Order By M.Idfamilia"
CALL OBRE_RS(CONSULTA)
IF RS.eof <> TRUE THEN
Temp=RS.fields("IdFamilia")
%>
|
<%=RS.fields("NomFamilia")%> |
<%
END IF
WHILE NOT RS.eof%>
<%IF RS.fields("IdFamilia") <> Temp THEN%>
|
<%=RS.fields("NomFamilia")%>
|
<%END IF%>
" class="i"><%=RS.fields("tituloNoticia")%>
<%=RS.fields("Font")%> - <%=RS.fields("fecha")%>
|
<%Temp=RS.fields("IdFamilia")%>
<%RS.movenext
WEND
CALL TANCA_RS
CALL TANCA_CONEXIO
%>
|