ACTIVIDADES De nuevo podemos ver las fotos de las ltimas rutas. Como antes, si quieres acceder a una actividad concreta, debajo tienes el listado por orden cronolgico. Y ahora, en el blog puedes poner tus propios comentarios. <% Set ObjConn=Server.CreateObject("ADODB.Connection") ObjConn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=C:\whb\Sites\6624\DataFiles\adesalambrar.mdb;PWD=20399;UID=admin" Set tabla=server.createobject("adodb.recordset") sql="SELECT * from actividades WHERE (((actividades.fecha_noticia) <% tabla.movenext loop tabla.close objconn.close set tabla=nothing set objconn=nothing %>
") %> <%=day(tabla.fields("fecha_noticia"))%>-<%=month(tabla.fields("fecha_noticia"))%>-<%=year(tabla.fields("fecha_noticia"))%> <% response.write(" | ") response.write(tabla.fields("Titulo")) response.write("
") if tabla.fields("direccion_web")<>"" THEN response.write("
Ver fotos y descripción") end if if tabla.fields("Track")<>"" THEN response.write("Descarga el track") end if %>