Página actual: <%= request.querystring("paginaactual")%> <% Response.write "" Do while not rsProd.EOF do while not rs.eof and contreg < maxregistros Response.write "" response.write "" response.write "" rs.movenext contreg=contreg+1 loop rsProd.MoveNext Loop Response.write "" cero="0" nombrescript=request.servervariables("script_name") if int(mostrarpagina)<>1 then '--si no es la primer página mostrar botón atrás ref="[<< Previo] " end if for contador=1 to maxpagina If contador > 9 then cero="" end if ref=ref & " " & cero & contador & "" else ref=ref & "'>" & cero & contador & "" end if next if int(mostrarpagina)<>int(maxpagina) then '-- si no es la última página ' mostrar botón Next ref=ref & " [Siguiente >>]" end if response.write ref %> " response.write " " response.write "" response.write (rs.fields("fecha").Value) response.write " " response.write "" response.write (rs.fields("titu").Value) response.write " " response.write "" response.write rs.fields("texto") response.write " " response.write "" response.write rs.fields("descripcion") response.write " " response.write "" response.write rs.fields("link") response.write "" response.write "

<% rsProd.Close set rsProd = Nothing Conn.Close set Conn = Nothing end if %>