Cuenca del río Sinú

<%sql = "set dateformat dmy SELECT FECHA,hora,titulo,resumen,cuerpo, day(fecha), month(fecha), year(fecha) from rios where cuenca = 4 order by fecha desc" Set TEM = DATACONN.Execute(sql) if NOT TEM.BOF AND NOT TEM.EOF THEN DATOS = TEM.GetRows() set tem = nothing %>

<%=datos(2,0)%>

<%=DIAS(weekday(dateserial(year(datos(0,introw)),month(datos(0,introw)),day(datos(0,introw)))))%><%response.write" "%><%=datos(5,introw) & "/" & datos(6,introw) & "/" & datos(7,introw)%>, <%=datos(1,0)%>

<%=datos(3,0)%>

<%=datos(4,0)%>
<% end if oconn.desconectar set dataconn=nothing %>