Visualizzazione dei risultati da 1 a 3 su 3
  1. #1
    Utente di HTML.it
    Registrato dal
    Dec 1999
    Messaggi
    336

    paginazione a colonne + scorrimento

    Ciao a tutti. cercando nel forum ho trovato sia una paginazione a + colonne che una paginazione con scorrimenti dei record.
    Ho cercato di "unire" i due script in modo tale da realizzare una pagina "a colonne" con la possibilità di scorrere fra i record.





    <%
    iPageSize = 10 ' NUMMERO DI RECORDS
    if request.QueryString("page") = "" then
    iPageCurrent = 1
    else
    iPageCurrent = CInt(request.QueryString("page"))
    end if

    set rs = server.CreateObject("ADODB.Recordset")

    qry = "SELECT T_PRODOTTI.*, T_PRODOTTI.IC_CAT FROM T_PRODOTTI WHERE (((T_PRODOTTI.IC_CAT)=1))"
    'creo il recordset
    'set rs = conn.execute(qry)



    rs.open qry, conn, 3,3
    rs.PageSize = iPageSize
    rs.CacheSize = iPageSize
    iPageCount = rs.PageCount

    if iPageCurrent > iPageCount then iPageCurrent = iPageCount
    if iPageCurrent < 1 then iPageCurrent = 1
    if ipageCount <> 0 then
    NumeroColonne = 2
    %>
    <table border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#B2B2B2" bgcolor="#FFFFFF">
    <%
    rs.AbsolutePage = iPageCurrent
    iRecordsShown = 0 %>
    <tr valign="middle">
    <td height="15" colspan="2"><div align="center"><span class="carattereGenerale">Pagine:
    <% for x = 1 to iPageCount
    if iPageCurrent = x then %>
    <font color="#00000" face="Verdana, Arial, Helvetica, sans-serif" size="1">[<%= x %>]</font>
    <% else %>
    <font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%= x %></font>
    <%end if
    next %>
    </span></div></td>
    </tr>
    <%
    cont=0
    while not rs.EOF
    cont=cont+1
    if ((cont-1) mod NumeroColonne)=0 then%>
    <tr><%
    end if%>
    <td>
    <table width="179" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
    <tr valign="top" class="carattereGenerale-1">
    <td width="87"><div align="center"> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="index1.asp?look=PROD&amp;ID_PROD=<%=rs("ID_P ROD")%>" class="menubasso" title="Ingrandisci">[img]thumb.aspx?FileName=public/images/caricate/<%=rs([/img]&ScaleFactor=22" alt="Ingrandisci" hspace="2" vspace="2" border="0" />

    [img]public/images/ZOOM.gif[/img]</a></font></div></td>
    <td width="92"><div align="left"><font color="#666666" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= rs("prod_desc")%>



    </font>
    <font size="1" face="Verdana, Arial, Helvetica, sans-serif">
    <% if RS("PROD_PREZZOSCONTATO") <> 0 then %>
    <s>&euro;<%=formatnumber(RS("PROD_PREZZO"),2)%></s>

    <font color="#FF0000">&euro;<%=formatnumber(RS("PROD_PRE ZZOSCONTATO"),2)%></font></font>
    <font size="1" face="Verdana, Arial, Helvetica, sans-serif">
    <% else %>
    &euro;<%=formatnumber(RS("PROD_PREZZO"),2)%>
    <% end if %>


    </font></div></td>
    </tr>
    <tr valign="top" class="carattereGenerale-1">
    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"></font></td>
    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"></font></td>
    </tr>
    </table></td><%
    if (cont mod NumeroColonne)=0 then%>
    </tr><%
    end if
    id = id+1
    rs.movenext
    wend
    for i=((cont mod NumeroColonne)+1) to NumeroColonne%>
    <td></td>
    <%
    next%>
    </table><%
    end if%>
    Il problema è che le mi ripete tutti i record per tre o + pagine, secondo quanti record
    dovè che erro?
    Oppure, sapete dirmi dove andare a guardare ?

    Ciao

  2. #2
    Utente di HTML.it
    Registrato dal
    Dec 1999
    Messaggi
    336

    UP

    uppese!

  3. #3
    Utente di HTML.it
    Registrato dal
    Dec 1999
    Messaggi
    336

    nessuno sa darmi qualche dritta?

    Ciao!

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 © 2025 vBulletin Solutions, Inc. All rights reserved.