Como delimitar el tamaño de una consulta

[joseantonim]

Mi problema es el siguiente, tengo una consulta de noticias, en la que al realizarla desconzco el tamaño que tienen las mismas, ya que pueden ser mas o menos extensas.

Realice un codigo para ller las noticias, y presentarlas en la Web, pero el resultado es que al haber muhcas noticias,y no limitar el número se salian del espacio diseñado para ello, luego las he limitado con el elemento for, para que solo muestre un número de registros limitado, pero aún me sucede que dependiendo del tamaño de las noticias (texto escrito en la tabla de acces) o bien me sobra espacio para una noticia más, o bien se me salen por abajo por que alguien se alargo demasiado en el texto.

¿Puedo mediante algún control, conocer el número de lineas que he ocupado, y de ese modo solicitar que se salga del bucle para no mostrar más noticias?

Os paso el codigo que he usado en ambas ocasiones por si ayuda en algo, ya os digo que soy nuevo en asp, y poco a poco voy aprendiendo pero aveces me atasco.

Gracias de antemano.

Codigo con el control EOF, me da todas las noticias que hay en la tabla, y se me sale por abajo del diseño de la página.

Código asp:

<&#37;
    Dim oConn, RS
    'conectamos a la tabla.
    Set oConn = Server.CreateObject ("ADODB.Connection")
    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("basedatos.mdb")
    'Abrmios el RecordSet (accedemos a los datos de la BD).
    sql = "SELECT * FROM noticias"
    Set RS = Server.CreateObject ("ADODB.RecordSet")
    RS.Open sql, oConn
    'Mostramos los campos hasta que nuestro RS no termine.
    'Cuando termine... sale del bulcle automaticamente.
    Do While Not RS.EOF
    Dim links
    links = RS("Link")
        Response.Write ("<p align= left>")& RS("Portada") 
        Response.Write ("<p align= right><a href="&links&">Mas información</a>")
        Response.Write ("<p align=center><font size=5 color=#808080><b>...................................................</b></font></p>")             
    'MoveNext nos movera al siguiente registro de la tabla. A la siguiete fila.
    RS.MoveNext
    Loop
    'primero cerramos los objetos y luego los limpiamos.
    RS.Close
    oConn.Close
    Set RS = nothing
    Set oConn = nothing
%>
 

Codigo con el bucle For, me arregla algo pero no limita por tamaño que es lo que necesito.

Código asp:

<%
    'conectamos a la tabla.
    Set oConn = Server.CreateObject ("ADODB.Connection")
    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("basedatos.mdb")
    'Abrmios el RecordSet (accedemos a los datos de la BD).
    sql = "SELECT * FROM noticias ORDER BY Id DESC"
    Set RS = Server.CreateObject ("ADODB.RecordSet")
    RS.Open sql, oConn
    'Mostramos los campos hasta que nuestro RS no termine.
    'Cuando termine... sale del bulcle automaticamente.
    cuen = 0
    For cuen = 0 To 5 Step 1
        links = RS("Link")
        Response.Write ("<p align= left>")& RS("Portada") 
        Response.Write ("<p align= right><a href="&links&">Mas información</a>")
        Response.Write ("<p align=center><font size=5 color=#808080><b>...................................................</b></font></p>")             
        'MoveNext nos movera al siguiente registro de la tabla. A la siguiete fila.
        RS.MoveNext
    Next
    'primero cerramos los objetos y luego los limpiamos.
    RS.Close
    oConn.Close
    Set RS = nothing
    Set oConn = nothing
%>
 

Bueno lo dicho gracias por la colaboración.

[Adler]

Hola

Se me ocurre que podrías usar un div, para el exceso

<div id="contenedor" style="overflow:hidden" width="100px" height="100px">

.....

</div>

Al usar la propiedad CSS overflow con el valor hidden impides que haya scroll. Además has de añadirle el ancho y largo que quieres que ocupe

Para el defecto lo que has de hacer es alargar el bucle, pero no tal y como lo estás haciendo, me refiero a que uses getrows para imprimir los registros y sacar la cantidad que se ha traído

Suerte

[joseantonim]

Gracias por la respuesta;

tras darle unas cuantas vueltas lo he dejado del siguiente modo, para el defecto uso la propiedad EOF del Recodset,
if RS.EOF = true then
exit for
end if

y para el exceso he preferido, aunque no es lo que buscaba poner la propiedad overflow = auto, en el div, ya que ya lo tenía en una capa, lo que no había puesto todo el codigo completo.

No me llega a llenar, pero por lo menos el exceso lo controla con un scroll, ya que ponerlo en hidden, supone que corte una noticia por la mitad, por eso quería poder conocer el numero de líneas escritas para decirle al recordset que parase en el momento que no cogiese una nueva noticia.

Pero gracias, he logrado que quede mucho mejor ahora.

[adiazm]

¿Mi estimado, y ya pensó en poner en la consulta sql un top 5 o la cantidad de noticias que quiera?

Además, podrías realizar la operación de cortar el contenido incorporando un mid antes de mostrar el campo y limitarlo 150 caracteres, por ejemplo.

[sjam7]

no se que base de datos uses pero en MySQL yo uso la opcion LIMIT asi

SQL="Select * FROM noticias ORDER BY id DESC LIMIT 5"