Newsgroup: it.comp.www.asp
Titolo: Help Paginazione

salve a tutti,
premetto che sono un principiante nella programmazione asp. Mi trovo ad
affrontare questo problema, partendo da un file top.asp dove
ci sono 2 menu a discesa che leggono automaticamente 2 tabelle in un file
.mdb e ne visualizzano il contenuto.
Poi tramite un form passo i valori, con il metodo post ad un altro file
engine.asp.
Fin qui tutto bene i dati mi vengono visualizzati. Il problema e' quando
cerco di fare la paginazione, ho provato anche gli esempi apparsi ASPItalia
ma mi vengono restituiti svariati errori.
1) engine.asp
<%@ LANGUAGE="VBSCRIPT" %>
<% Response.Expires = 0 %>
<html>
<head>
<script LANGUAGE="JavaScript1.1">
<!-- Begin
function right(e) {
if (navigator.appName == 'Netscape' &&
(e.which == 3 || e.which == 2))
return false;
else if (navigator.appName == 'Microsoft Internet Explorer' &&
(event.button == 2 || event.button == 3)) {
alert("Comando non valido!!!");
return false;
}
return true;
}
document.onmousedown=right;
if (document.layers) window.captureEvents(Event.MOUSEDOWN);
window.onmousedown=right;
//  End -->
</script>
</head>
<body topmargin="0" leftmargin="0" bgcolor="#000099">
<%
Server.ScriptTimeout=240
Dim SqlJunk
Set dbGlobalWeb = Server.CreateObject("ADODB.Connection")
dbGlobalWeb.Open("ivan")
SqlJunk = "SELECT * FROM Tlistino"
SqlJunk = SqlJunk & " WHERE (Marca= '"& _
Request.Form("DaInBox") & "' AND [Linea Prodotto]='"&
Request.Form("TypeSearch") & "')"
If Request.Form("TypeSearch")="Tutte" then sqlJunk = "SELECT * FROM Tlistino
WHERE (Marca= '"& Request.Form("DaInBox")& "')"
If Request.Form("DaInBox")="Tutte" then sqlJunk = "SELECT * FROM Tlistino
WHERE ([Linea Prodotto]= '"& Request.Form("TypeSearch")& "')"
Dim rsGlobalWeb
Set rsGlobalWeb = Server.CreateObject("ADODB.Recordset")
rsGlobalWeb.Open SqlJunk, dbGlobalWeb, 3,3
%>
<table BORDER="1" width="779" cellspacing="0" height="5" cellpadding="0">
  <tr bgcolor="#FF6633">
    <th width="84" align="center" height="16"><font face="Arial" size="2"
    color="#000080">Quantità</font></th>
    <th width="166" align="center" height="16"><font face="Arial" size="2"
    color="#000080">Linea Prodotto </font></th>
    <th width="121" align="center" height="16"><font face="Arial" size="2"
    color="#000080">Marca</font></th>
    <th width="240" align="center" height="16"><font face="Arial" size="2"
    color="#000080">Descrizione</font></th>
    <th width="86" align="center" height="16"><font face="Arial" size="2"
    color="#000080">Prezzo Ivato</font></th>
    <th width="56" align="center" height="16"><font face="Arial" size="2"
    color="#000080"><img src="images/euro2.gif" width="15" height="15"
align="absmiddle">
      </font></th>
  </tr>
<%
While Not rsGlobalWeb.EOF
%>
  <tr>
    <td width="84" height="35" valign="top" bgcolor="#000099">
      <form action="addprod.asp" method="POST" name="">
        <input type="hidden" name="fproductid" value="<%=rsGlobalWeb("Codice
Delta")%>">
        <input type="hidden" name="fprezzo" value=<%=rsGlobalWeb("Prezzo
Ivato")%>>
        <input type="hidden" name="fdescrizione"
value="<%=rsGlobalWeb("Descrizione")%>">
        <input maxLength="3" name="fquantity" size="3" value="1">
        <input type="submit"
      value="Add" name="order">
      </form></td>
    <td bgcolor="#CCCCCC" height="35" valign="top"><font face="Arial"
size="1"
    color="#000000"><%=rsGlobalWeb("Linea Prodotto")%> </font></td>
    <td align="center" bgcolor="#CCCCCC" height="35" valign="top"><font
    face="Arial" size="1" color="#000000"><%=rsGlobalWeb("Marca")%>
</font></td>
    <td bgcolor="#CCCCCC" height="35" valign="top"><font face="Arial"
size="1"
    color="#000000"><%=rsGlobalWeb("Descrizione")%> </font></td>
    <td align="center" bgcolor="#CCCCCC" height="35" valign="top"><font
    face="Arial" size="1" color="#000000">Lit. <%=formatnumber(rsGlobalWeb
("Prezzo Ivato"),0)%>
      </font></td>
    <td align="center" bgcolor="#CCCCCC" height="35" valign="top"><font
face="Arial"
    size="1" color="#000000"><%=FormatNumber(rsGlobalWeb ("Euro Ivato"),2)%>
</font></td>
<%
rsGlobalWeb.MoveNext
wend
rsGlobalWeb.Close
dbGlobalWeb.Close
%>
  </tr>
</table>
</body>
</html>
COME FACCIO A FARE LA PAGINAZIONE ?
Grazie a tutti
Ivan
in...@righi.com

Prova su 
http://www.asp101.com/samples/index.asp
 dove troverai molti esempi
tra cui la paginazione.
Saluti
Fabrizio
