<% dim rsNotas set rsnotas = server.CreateObject("ADODB.recordset") rsNotas.ActiveConnection = application("conexion") rsNotas.source = "select id, volanta, titulo, bajada from frente_renovador_proyectos order by id desc" rsNotas.Open %> <% while not rsnotas.eof %> <% rsnotas.movenext wend %>
 
Proyectos del Bloque:
 
<%=rsnotas.fields("volanta")%>
<%=rsnotas.fields("bajada")%>

&p=1" class="link_izquierda" title="<%=trim(rsnotas.fields("titulo"))%>" target="_blank"><%=trim(rsnotas.fields("/> Leer...
<% rsnotas.close rsNotas.source = "select id, volanta, titulo, foto, epigrafe, bajada from frente_renovador_notas order by id desc" rsNotas.Open %> <% while not rsnotas.eof %> <% rsnotas.movenext if not rsnotas.eof then %> <% end if wend %>
<% dim fso Set fso = CreateObject("Scripting.FileSystemObject") if fso.fileexists(application("dir_notas") & "\" & trim(rsnotas.fields("foto"))) then %>
" target="_blank">" border="0" class="borde_imagen">   
<%=rsnotas.fields("epigrafe")%>
<% end if %> <%=rsnotas.fields("bajada")%>

" class="link_izquierda" target="_blank"> Leer...