Ciclo Times

<%CALL Cap%>

<% DIM RS,CN CALL Menu() %>

<% on error resume next CALL OBRE_CONEXIO response.Write(err.description) data= mid(now,4,2) CONSULTA="SELECT * FROM Contenidos AS C,TiposMenu as T,CicloTimes AS Ci WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCiclotimes=C.IdCiclotimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.IdTiposMenu=14 AND C.paperera='' AND C.Portada='on' AND C.Visible='on' Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%IF RS.eof <> true then%> <%RS.movenext%> <%END IF%> <% WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Titulars
<%=REPLACE(RS.fields("tituloContenido"),"~","'")%> <%=RS.fields("TextoContenido")%> <%RS.movenext%>	<%=REPLACE(RS.fields("tituloContenido"),"~","'")%> <%=RS.fields("TextoContenido")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * FROM TiposMenu AS T,CicloTimes AS Ci,Contenidos AS C LEFT JOIN Imagenes AS I ON C.IdContenido=I.IdContenido WHERE T.IdTiposMenu=C.IdTiposMenu AND Ci.Idciclotimes=C.idciclotimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND T.contenidostipo=2 AND C.Visible='on' AND C.Portada='on' Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%IF RS.eof <> true then%> <%RS.movenext%> <%END IF%> <% WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Bici-Flash
<%IF RS.fields("RutaImagen") <> "" THEN%> ','Fotografia','width=430,height=200,resizable=yes');">" border="0" align=left alt="<%=RS.fields("tituloImagen")%>"> <%END IF%> <%=RS.fields("tituloContenido")%> <%=RS.fields("TextoContenido")%> <%RS.movenext%>	<%IF RS.fields("RutaImagen") <> "" THEN%> ','Fotografia','width=430,height=200,resizable=yes');">" border="0" align=left alt="<%=RS.fields("tituloImagen")%>"> <%END IF%> <%=RS.fields("tituloContenido")%> <%=RS.fields("TextoContenido")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=2 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Articles
" class="i"><%=RS.fields("tituloContenido")%> Per <%=RS.fields("Autor")%>. <%=RS.fields("Fuente")%> - <%=RS.fields("fechaContenido")%>

<% 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' AND M.Portada='on' Order By M.Idfamilia,Ordre ASC" CALL OBRE_RS(CONSULTA) IF RS.eof <> TRUE THEN Temp=RS.fields("IdFamilia") %> <% END IF WHILE NOT RS.eof%> <%IF RS.fields("IdFamilia") <> Temp THEN%> <%END IF%> <%Temp=RS.fields("IdFamilia")%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Més Notícies
<%=RS.fields("NomFamilia")%>
<%=RS.fields("NomFamilia")%>
" class="i"><%=RS.fields("tituloNoticia")%>. <%=RS.fields("Poblacio")%>. <%=RS.fields("Font")%> - <%=RS.fields("fechaNoticia")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=3 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Bicirutes
" class="i"><%=RS.fields("tituloContenido")%>. <%=RS.fields("Autor")%>. <%=RS.fields("Fuente")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=4 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Biciteka de novetats editorials
" class="i"><%=RS.fields("tituloContenido")%>. <%=RS.fields("Autor")%>. <%=RS.fields("Fuente")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=5 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Opinió
" class="i"><%=RS.fields("tituloContenido")%>. <%=RS.fields("Autor")%>. <%=RS.fields("Fuente")%> - <%=RS.fields("fechaContenido")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci WHERE C.IdCicloTimes=Ci.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=6 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Sug-web-riments
" class="i"><%=RS.fields("tituloContenido")%> - <%=RS.fields("LinkContenido")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=7 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Recomanem
" class="i"><%=RS.fields("tituloContenido")%>. <%=RS.fields("fuente")%>. <%=RS.fields("poblacio")%> - <%=RS.fields("fechaContenido")%>

<% CALL OBRE_CONEXIO CONSULTA="SELECT * From Contenidos AS C,CicloTimes AS Ci, TiposMenu AS T WHERE C.IdtiposMenu=T.IdTiposMenu AND Ci.IdCicloTimes=C.IdCicloTimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND C.paperera='' AND C.Visible='on' AND C.Portada='on' AND C.IdTiposMenu=11 Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%RS.movenext WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

Robatoris
" class="i"><%=RS.fields("tituloContenido")%>. <%=RS.fields("fuente")%>. <%=RS.fields("poblacio")%> - <%=RS.fields("fechaContenido")%>
Relació de bicis robades

<% CALL OBRE_CONEXIO CONSULTA="SELECT * FROM TiposMenu AS T,CicloTimes AS Ci,Contenidos AS C LEFT JOIN Imagenes AS I ON C.IdContenido=I.IdContenido WHERE T.IdTiposMenu=C.IdTiposMenu AND Ci.Idciclotimes=C.idciclotimes AND C.IdCiclotimes=" & Session("Id_Ciclotimes") & " AND T.IdTiposMenu=16 AND C.Visible='on' AND C.Portada='on' Order by ordre ASC" CALL OBRE_RS(CONSULTA) WHILE NOT RS.eof%> <%IF RS.eof <> true then%> <%RS.movenext%> <%END IF%> <% WEND CALL TANCA_RS CALL TANCA_CONEXIO %>

... i més ...
<%IF RS.fields("RutaImagen") <> "" THEN%> ','Fotografia','width=430,height=200');">" border="0" align="right" alt="<%=RS.fields("tituloImagen")%>"> <%END IF%> <%=RS.fields("tituloContenido")%> <%=RS.fields("TextoContenido")%> <%RS.movenext%>	<%IF RS.fields("RutaImagen") <> "" THEN%> ','Fotografia','width=430,height=200');">" border="0" align="right" alt="<%=RS.fields("tituloImagen")%>"> <%END IF%> <%=RS.fields("tituloContenido")%> <%=RS.fields("TextoContenido")%>

Subscripcions

Si vols rebre períodicament el Ciclo Times, subscriu-te a bacc-ciclotimes:

Amb la col·laboració de

Comissió de Joventut i Drets Civils de l'Ajuntament de Barcelona
Biciclot. Centre de serveis per a la promoció de l'ús de la bicicleta
Gremi de Comerciants de Bicicletes de Catalunya
2on Pla de Medi Ambient de la Universitat Politècnica de Catalunya

<%CALL Peu()%>