Filoweb.it

Paginazione dei risultati di query di grandi dimensioni


FB TW G+ whatsapp RSS FEED News letter
ASP
Paginazione dei risultati di query di grandi dimensioni


  <%@LANGUAGE = VBScript%>
<%
    '  DEFINISCO LE VARIABILI CHE MI SERVONO PER L' APPLICAZIONE
    Dim sc, cn, rs, quanti, pag, contatore

    '  DEFINISCO LA STRINGA DI CONNESSIONE
    sc = " " 
    sc = sc & " driver={Microsoft Access Driver (*.mdb)};dbq=" 
    sc = sc & Server.MapPath(" database.mdb" )

    '  IMPOSTO LA CONNESSIONE EDIL RECORDSET
    Set cn = Server.CreateObject(" ADODB.Connection" )
    Set rs = Server.CreateObject(" ADODB.Recordset" )

    '  APRO LA CONNESSIONE COL DATABASE
    cn.Open sc

    '  DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
    quanti = 5

    '  RECUPERO IL NUMERO DI PAGINA CORRENTE
    '  E CONTROLLO CHE NON SIA INFERIORE A 1
    pag = Request.QueryString(" pag" )
    If IsNumeric(pag) = False Or pag < 1 Then pag = 1

    '  IMPOSTO UN CONTATORE
    contatore = 0
%>
<html>
<head>
<title>Paginazione dei risultati di query molto lunghe in ASP</title>
<style>a { color: blue; }</style>
</head>
<body>

<table align=" center"  width=" 300"  border=" 1" >
<%
    '  APRO IL RECORDSET
    rs.Open " SELECT nome FROM utenti ORDER BY nome ASC" , cn, 1
    '  EFFETTUO MATERIALMENTE LA PAGINAZIONE
    rs.PageSize = quanti
    rs.AbsolutePage = pag
    '  ESEGUO IL CICLO
    While rs.EOF = False And contatore < quanti
%>
    <tr><td><%=rs(" nome" )%></td></tr>
<%
        rs.MoveNext
        '  INCREMENTO IL VALORE DEL CONTATORE
        contatore = contatore + 1
    Wend
%>
</table>

</body>
</html>
<%
    '  UN PO DI PULIZIA...
    rs.Close
    Set rs = Nothing
    cn.Close
    Set cn = Nothing
%> 
FB TW G+ whatsapp RSS FEED News letter

filoweb.it è il sito personale di Filippo Brunelli
(c) 2017 Filippo Brunelli
Le immagini ed i testi contenuti nel sito sono di proprietà di Filippo Brunelli salvo diversamente indicato.
L'uso delle immagini e del testo è gratuito per uso personale ed è subbordinato alla citazione della fonte.
Brunelli Filippo declina ogni responsabilità per l'uso che viene fatto delle informazioni presenti nel sito.
FILOWEB.it Piccolo quaderno degli appunti. Argomento: ASP, Titolo:Paginazione dei risultati di query di grandi dimensioni. Altri script riguardano: CSS, Jscript, .net, Classic Asp, HTML, Jquery, varie, url rewrite, pagina protetta da password, ecc. Altro su https://www.filoweb.it