Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/04/2008, 04:58
txuk
 
Fecha de Ingreso: febrero-2008
Mensajes: 25
Antigüedad: 16 años, 3 meses
Puntos: 0
visualizar campos de una tabla

Hola.

Tengo una tabla de la que quiero visualizar una serie de campos varias veces. Para ello utilizo un while(hasta q se acabe el select).
Lo que quiero es que solo se visualicen los ultimos 4 por fecha.

El codigo que utilizo es:

sql2= "select titulo,tema,fecha,foto from actividades_area order by fecha desc"
Set rs2 = con.Execute(sql2)

j=1

do while not rs2.eof
if j<5 then
response.Write("<table width='90%' align='center'>")
response.Write("<tr><td class='texto_responsables'><table width='100%'><tr><td align='left' valign='top'>"&rs2("titulo")&"</td><td align='right' valign='top'>"&rs2("fecha")&"</td></tr></table></td></tr>")
response.Write("<tr><td><table width='100%'><tr><td align='left' valign='top'><img src='imagenes/"&rs2("foto")&"' alt='' name='foto' width='130' height='80' id='foto'/></td><td width='3%'></td><td align='left' valign='top' class='texto_actividad'>"&rs2("tema")&"</td></tr></table></td></tr>")

response.Write("<tr><td colspan='2'>")
response.Write("<hr>")
response.Write("</td></tr></table>")
rs2.movenext
j=j+1
end if
loop

lo que me pasa es que me tarda muchisimo en cargar la pagina y al final me da el error:
Páginas Active Server error 'ASP 0113'

Tiempo de espera agotado para la secuencia de comandos


Que hago mal????

Gracias.