Pagina 1 di 6 1 2 3 ... ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 59

Discussione: paginazione

  1. #1
    Utente di HTML.it
    Registrato dal
    Mar 2001
    Messaggi
    254

    paginazione

    Lo so che dite di guardare gli altri post eccecc

    ho cercato...

    ho trovato ho letto ho provato....

    ma è troppo complicato non so dove mettere le mani

    ecco il mio codice:

    'Apre il database
    dbfile = Server.MapPath("../db/base.mdb")
    Set Con = Server.CreateObject( "ADODB.Connection" )
    con.connectionstring="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & dbfile & ";"
    Con.Open

    sqlString = "SELECT * FROM msg"
    Set RS = Server.CreateObject( "ADODB.Recordset" )
    RS.ActiveConnection = Con
    RS.Open sqlString


    bg1 = 1
    bgcolor = "#9CAE46"
    Repeat=1
    Do Until rs.EOF


    While ((Repeat <> 0) AND (NOT Rs.EOF))

    ' estrare i record in tabelle ecc.....

    testo=rs.fields("msg")
    testo=replace(testo,"@1","<img src=smile.gif>")
    testo=replace(testo,"@2","<img src=frown.gif>")
    testo=replace(testo,"@3","<img src=sgrat.gif>")
    testo=replace(testo,"@4","<img src=ciapet.gif>")
    testo=replace(testo,"@5","<img src=metallica.gif>")
    testo=replace(testo,"@6","<img src=biggrin.gif>")
    testo=replace(testo,"@7","<img src=dho.gif>")
    testo=replace(testo,"@8","<img src=electric_g.gif>")
    response.write testo

    Repeat=Repeat -1
    Rs.MoveNext()
    Wend

    Repeat=1

    ho trovato quella paginazione di roby ma non so nemmeno da che parte cominciare............

    vi prego helppp
    Loop
    Vi piacciono i manga????Venite a trovarci sul nostro forum....

    BASTARD!! OSCURO DISTRUTTORE

  2. #2
    Utente di HTML.it L'avatar di pip19
    Registrato dal
    Dec 2001
    Messaggi
    512
    dove te lo da l'errore?

  3. #3
    Utente di HTML.it
    Registrato dal
    Mar 2001
    Messaggi
    254
    non è che mi da errore..

    è che non so proprio dove e come adattare il mio script!!!!
    Vi piacciono i manga????Venite a trovarci sul nostro forum....

    BASTARD!! OSCURO DISTRUTTORE

  4. #4
    Si ma
    che devi fare?

  5. #5
    Io dico che il caldo da' alla testa.............
    E' nato www.lombardiamotori.it

    www.universocase.it: il primo portale italiano di annunci immobiliari gratuiti e autogestiti!

  6. #6
    Utente di HTML.it
    Registrato dal
    Mar 2001
    Messaggi
    254
    vi prego help meeeeeee

    devo impaginare i record che estraee!!!!

    ho lo script di roby_76 ma non ci capisco un h......
    Vi piacciono i manga????Venite a trovarci sul nostro forum....

    BASTARD!! OSCURO DISTRUTTORE

  7. #7
    Utente di HTML.it
    Registrato dal
    Mar 2001
    Messaggi
    254
    in pratica è un piccolo forum con gestione utenti profilo ecc ecc

    tutto il resto va da dio ma mi hanno fatto notare che ci vorebbe un impaginazione che non so da dove cominciare a fare!!!!!
    Vi piacciono i manga????Venite a trovarci sul nostro forum....

    BASTARD!! OSCURO DISTRUTTORE

  8. #8
    Beh, almeno hai detto qual è la questione.........bisogna che posti la parte di codice che si occupa di presentare i dati, se vuoi una mano per impaginarli...........comunque (mi ripeto) inserendo la parolina "paginazione" nel motore di ricerca del forum trovi di tutto di più..................
    E' nato www.lombardiamotori.it

    www.universocase.it: il primo portale italiano di annunci immobiliari gratuiti e autogestiti!

  9. #9
    Utente di HTML.it
    Registrato dal
    Mar 2001
    Messaggi
    254
    teo lo so ma non so come inserire i codici che trovo.......ora posto tutto il codice:

    ti prego aiutami...

    <%

    'Apre il database
    dbfile = Server.MapPath("../db/base.mdb")
    Set Con = Server.CreateObject( "ADODB.Connection" )
    con.connectionstring="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & dbfile & ";"
    Con.Open

    sqlString = "SELECT * FROM msg"
    Set RS = Server.CreateObject( "ADODB.Recordset" )
    RS.ActiveConnection = Con
    RS.Open sqlString





    %>

    <html>

    <head>
    <meta http-equiv="Content-Language" content="it-ch">
    <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
    <title>Nuova pagina 2</title>
    </head>
    <style type="text/css">
    BODY {
    SCROLLBAR-BASE-COLOR: #768834;
    SCROLLBAR-ARROW-COLOR: #9CAE46;
    overflow-x:hidden;
    }
    </style>
    <script language="JavaScript1.2">


    function changeto(highlightcolor){
    source=event.srcElement
    if (source.tagName=="TR"||source.tagName=="TABLE")
    return
    while(source.tagName!="TD")
    source=source.parentElement
    if (source.style.backgroundColor!=highlightcolor&&sou rce.id!="ignore")
    source.style.backgroundColor=highlightcolor
    }

    function changeback(originalcolor){
    if (event.fromElement.contains(event.toElement)||sour ce.contains(event.toElement)||source.id=="ignore")
    return
    if (event.toElement!=source)
    source.style.backgroundColor=originalcolor
    }
    </script>
    <body bgcolor="#9CAE46">
    <table border="0" width="100%" id="table2" bgcolor="#8BA23E">
    <tr>
    <td>
    <table border="0" width="100%" id="table17" height="40">
    <tr>
    <td width="472"><font face="Arial">Discussione : Titolo
    discussione</font>
    </td>
    <td>
    [img]button1.jpg[/img]</td>
    </tr>
    </table>
    </td>
    </tr>
    </table>
    <%


    bg1 = 1
    bgcolor = "#9CAE46"
    Repeat=1
    Do Until rs.EOF


    %>
    <%
    While ((Repeat <> 0) AND (NOT Rs.EOF))
    %>

    <table border="0" width="100%" id="table1" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" bordercolor="#9CAE46" height="333">
    <tr>
    <td height="304" bgcolor="<%=bgcolor %>" bordercolor="#0000FF" width="19%" valign="top"><font face="Arial Narrow" size="2">
    <span style="text-decoration: none"><a target="I1" href="crp_news.asp?id=">
    <font color="#000000"><span style="text-decoration: none">
    <table border="0" width="93%" id="table14">
    <tr>
    <td>
    <table border="0" width="108%" id="table15">
    <tr>
    <td><%= rs.fields("id_user")%></td>
    </tr>
    <tr>
    <td><font size="2">Admin</font></td>
    </tr>
    <tr>
    <td>[img]cyber.jpg[/img]</td>
    </tr>
    <tr>
    <td><cite style="font-style: normal">
    <font face="Arial Narrow" size="1">
    <span style="text-decoration: none"><a target="I1" href="crp_news.asp?id=">
    <font color="#000000"><span style="text-decoration: none">
    Registrato il: Jul 2004

    Provenienza: Kingdom Hearts

    Messaggi: 154

    ICQ </span></font></a></span></font></cite></td>
    </tr>
    </table>


    <cite>: </cite></td>
    </tr>
    </table>


    <%


    %>




    </span></font></a></span></font></td>
    <td height="304" bgcolor="<%=bgcolor %>" bordercolor="#0000FF" valign="top" width="80%">
    <table border="0" width="100%" id="table13">
    <tr>
    <td><%= rs.fields("id_canale")%></td>
    </tr>
    </table>


    <%

    testo=rs.fields("msg")
    testo=replace(testo,"@1","<img src=smile.gif>")
    testo=replace(testo,"@2","<img src=frown.gif>")
    testo=replace(testo,"@3","<img src=sgrat.gif>")
    testo=replace(testo,"@4","<img src=ciapet.gif>")
    testo=replace(testo,"@5","<img src=metallica.gif>")
    testo=replace(testo,"@6","<img src=biggrin.gif>")
    testo=replace(testo,"@7","<img src=dho.gif>")
    testo=replace(testo,"@8","<img src=electric_g.gif>")


    response.write testo %></td>
    </tr>
    <tr>
    <td height="21" bgcolor="#8BA23E" bordercolor="#8BA23E" valign="top" colspan="2">
    <table border="0" width="100%" id="table19" bgcolor="#8BA23E">
    <tr>
    <td width="155"><cite>
    [img]posticon.gif[/img]<font face="Arial" size="1"><%= rs.fields("data")%></font></cite></td>
    <td width="258"><cite>
    <a href="http://forum.html.it/forum/editpost.php?action=editpost&postid=6348359">
    [img]edit.gif[/img]</a>
    <a href="http://forum.html.it/forum/newreply.php?action=newreply&postid=6348359">
    [img]quote.gif[/img]</a>
    </cite></td>
    <td align="center">
    <p align="center"><cite>
    </cite></td>
    <td align="center">
    <cite>
    <a target="_blank" href="http://forum.html.it/forum/member.php?action=getinfo&userid=78576">
    [img]profile.gif[/img]</a></cite></td>
    <td align="center" width="128">
    <cite>
    <a target="_blank" href="http://www.senzasito.it">
    [img]home.gif[/img]</a></cite></td>
    <td width="123">
    <p align="center">
    <a href="add_news.asp?id=<%= rs.fields("id_canale")%>&id2=<%=rs.fields("id")%>" >
    [img]button4.jpg[/img]</a></td>
    <td width="102">
    <p align="center">
    <a href="add_news.asp?id=<%= rs.fields("id_canale")%>">
    [img]button5.jpg[/img]</a></td>
    </tr>
    </table>
    </td>

    <%
    Repeat=Repeat -1
    Rs.MoveNext()
    Wend
    %>




    </tr>
    <table border="0" width="100%" id="table3">
    <tr>
    <td bgcolor="#9CAE46">
    </td>
    </tr>
    <%
    Repeat=1
    Loop
    %>
    </table>

    </table>

    </body>

    </html>
    Vi piacciono i manga????Venite a trovarci sul nostro forum....

    BASTARD!! OSCURO DISTRUTTORE

  10. #10
    Dunque......ci sono diversi modi, di solito io faccio così: prima di cominciare la presentazione dei dati inserisco queste righe


    codice:
    numero=5 'notizie per pagina
    controllo=numero
    
    pag = TRIM(Request.QueryString("pag")) 'paginazione
    If pag="" Then
      pag = 1
    Else
      pag = CInt(pag)
    End If
    e dopo la tabella aggiungo


    codice:
    <center><table border="0" width="250">
    	<tr>
    <%
    If ( pag > 1) Then
    %>
    <td width="50%" align="left"></td>
    <% else %>
    <td width="50"></td>
    <% 
    end if
    %>
    <td width="220" align="center">
    <%
    if tot mod(numero)=0 then
    lastpage=int(tot/numero)
    else 'deve numerare l'ultima pagina anche se incompleta!
    lastpage=int(tot/numero)+1
    end if
    for c=1 to lastpage
    
    
    %>
    "><%=c%>
    <%
    next
    %></td><%
    If not rs2.eof Then
    %>
    		</td><td widht="50" align="right"><a href="nome_della_pagina?pag=<%=pag+1%></a></td>
    <% else %> <td widht="50"></td>
    <% end if %>
    </tr>
    </table>
    </center>
    
    
    
    <div>Pag. <%=pag%> di <%=lastpage%></div>
    In questo modo viene creata una piccola tabella sotto quella dei dati, che riporta il numero delle pagine in formato cliccabile.

    Devi solo settare il numero di record che vuoi mettere in ogni pagina.

    Nota che, all'inizio, lo script legge il numero di pagina nell'url: se la variabile è vuota (perchè non provieni da un'altra pagina) allora carica la pagina n° 1, mentre se la variabile "pag" è valorizzata significa che provieni da un'altra pagina e che hai cliccato su un numero di pagina. In questo caso il numero viene letto e viene caricata la pagina corrispondente.

    Con poche o nessuna modifica dovrebbe andare. Una modifica (indispensabile): nella tabella dove mostri i dati, devi usare la variabile "controllo" per dire alla pagina di stampare quel numero di records, per esempio facendo

    codice:
    do until controllo=0
    
    ....stampa la tabella dei dati.....
    
    controllo=controllo-1
    rs.movenext
    loop
    come ciclo per la stampa.

    La cosa poi si può abbellire con il disegno di una freccetta verso destra e una verso sinistra, ma la sostanza è questa.

    E' nato www.lombardiamotori.it

    www.universocase.it: il primo portale italiano di annunci immobiliari gratuiti e autogestiti!

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.