ASP Classic

Paginazione dei record con ASP Classic

Suddivide una query in pagine di risultati.

Quando si usa

Quando il database contiene molti articoli, prodotti, quiz o schede e non vuoi mostrarli tutti insieme.

Perché si usa

La paginazione alleggerisce la pagina, migliora la leggibilità e riduce il numero di record elaborati in ogni schermata.

Vantaggi principali

Numero di record configurabile
Navigazione tra le pagine
Compatibile con recordset ADO

Anteprima del risultato

La paginazione divide molti record in gruppi più piccoli, con collegamenti alle pagine successive.

1 2 3 Successiva

Record 6
Record 7
Record 8

Codice completo

Puoi copiare il frammento e inserirlo in una pagina di prova. Prima della pubblicazione sostituisci i dati dimostrativi con quelli reali.

<%
Dim pagina, rs
pagina = 1
If IsNumeric(Request.QueryString("pag")) Then pagina = CInt(Request.QueryString("pag"))
If pagina < 1 Then pagina = 1
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 10
rs.CacheSize = 10
rs.Open "SELECT ID, TITOLO FROM ARTICOLI ORDER BY ID DESC", conn, 3, 1
If Not rs.EOF Then
  If pagina > rs.PageCount Then pagina = rs.PageCount
  rs.AbsolutePage = pagina
  For i = 1 To rs.PageSize
    Response.Write "<p>" & Server.HTMLEncode(rs("TITOLO")) & "</p>"
    rs.MoveNext
    If rs.EOF Then Exit For
  Next
End If
rs.Close:Set rs=Nothing
%>

Da personalizzare: Sostituisci connessione, query, campi visualizzati e valore PageSize.

Errore da evitare: Ordina sempre i risultati e controlla che la pagina richiesta rientri nell'intervallo disponibile.