<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> Portal Joven - Excmo Ayuntamiento de La Roda <% Function tex(cadena) cadena = Replace(cadena,vbCrLf,"
") tex = cadena End Function Const totalzonas = 5 Randomize Dim foto zona = Int((totalzonas * Rnd) + 1) if zona =1 then foto="arriba2.jpg" end if if zona =2 then foto="arriba2_2.jpg" end if if zona =3 then foto="arriba2_3.jpg" end if if zona =4 then foto="arriba2_4.jpg" end if if zona =5 then foto="arriba2_5.jpg" end if %> <% hora=Time() hora1=CDate("7:25:50") hora2=CDate("19:25:50") if hora>hora1 and hora
Imagen desde la Torre de La Iglesia de El Salvador
tablon de anuncios

documentos


mas documentos

<% sSQL="SELECT * FROM anuncios WHERE Id=" & Request.QueryString("Id") & "" 'constantes ADO VBScript 'Const adCmdText = &H0001 'Const adOpenStatic = 3%> <%texto1 = tex(RS("Descripcion"))%>
Anuncios

<%=RS("fecha")%>

<%=RS("titulo")%>

<%=RS("asociacion")%>

<%=texto1%>
<% if RS("Documento")<>"" then%> linea
Documento adjunto >> "> <%=RS("documento")%>
<%end if%> <% RS.Close Conn.Close %>
Escucha Radio La Roda en Directo
RSS Agenda de La Roda
© 2009 Excmo. Ayuntamiento de La Roda. Todos Los Derechos Reservados.