Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it L'avatar di Spyfil
    Registrato dal
    Dec 2001
    Messaggi
    801

    Dubbio su script paginazione

    ho trovato e provato questo script per la paginazione

    codice:
    <% 
    'recupero la pagina 
    page = Request.QueryString("page") 
    ' imposto il numero di record per pagina 
    perpage = 10 
    
    'connessione al db 
    Set Conn = Server.CreateObject("ADODB.Connection") 
    Conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("percorso/database.mdb") 
    Set Rs = Server.CreateObject("ADODB.Recordset") 
    sql = "SELECT * FROM messaggi ORDER BY id" 
    Rs.Open sql, Conn, 1, 3 
    
    'imposto la variabile in modo da ottenere l'ultima se non ne viene specificata un'altra 
    If page = "" then 
    page = (rs.PageCount) 
    End if 
    
    'imposto la dimensione della pagina 
    Rs.PageSize = perpage 
    ' mi sposto all'ultima pagina 
    Rs.AbsolutePage = page 
    
    'scrivo i link ai 10 record 
    For i = 1 to perpage 
    If Not Rs.EOF then 
    if Rs("id") < 10 then 
    Response.Write ("[0" & Rs("id") & "] ") 
    else 
    Response.Write ("[" & Rs("id") & "] ") 
    end if 
    Rs.MoveNext 
    end if 
    next 
    
    'scrivo i numeri delle pagine 
    Response.Write "
    
    Pagine: " 
    
    For pag= 1 to rs.PageCount 
    if page = pag then 
    'grassetto per la pagina corrente 
    Response.Write "" 
    Response.Write "<A href='questapagina.asp?page=" & pag 
    Response.write "'>" 
    Response.Write pag 
    Response.Write "</A> " 
    Response.Write "" 
    else 
    'normale per le altre pagine 
    Response.Write "<A href='questapagina.asp?page=" & pag 
    Response.write "'>" 
    Response.Write pag 
    Response.Write "</A> " 
    end if 
    Next 
    
    Response.Write "</P>" 
    
    'chiudo la connessione 
    Rs.Close 
    Set Rs = Nothing 
    Conn.Close 
    Set Conn = Nothing 
    %>
    funziona e tutto.
    Solo non riesco a capire (ovviamente a causa della mia ignoranza) il perchè di questa riga:

    codice:
    if Rs("id") < 10 then
    Perchè si fa un controllo sull'id?
    Se qualcuno mi illumina lo ringrazio.

  2. #2
    perchè gli piace scrivere i numeri in doppia cifra anche se sono minori di 10....quindi invece di scrivere "1" scriverà "01"...il perchè fa così non lo so
    IP-PBX management: http://www.easypbx.it

    Old account: 2126 messages
    Oldest account: 3559 messages

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.