Ciao,
come mai se cerco di visualizzare il codice per Rs.AbsolutePage mi dà il valore -1?
Specifico che per il resto il codice funziona, che ho cercato su altri post ma non ho trovato nulla, e il Db è Access.
Grazie
Ciao,
come mai se cerco di visualizzare il codice per Rs.AbsolutePage mi dà il valore -1?
Specifico che per il resto il codice funziona, che ho cercato su altri post ma non ho trovato nulla, e il Db è Access.
Grazie
posti il codice?Originariamente inviato da Shaolin20
Ciao,
come mai se cerco di visualizzare il codice per Rs.AbsolutePage mi dà il valore -1?
Specifico che per il resto il codice funziona, che ho cercato su altri post ma non ho trovato nulla, e il Db è Access.
Grazie
<%
pg = Trim(Request("pg"))
If pg = "" then pg = 1
Set ProdRs = Server.CreateObject("ADODB.Recordset")
ProdRs.ActiveConnection = strConn
ProdRs.CursorType = adOpenStatic
ProdRs.PageSize = 4
sqlString = "SELECT * FROM Products WHERE product_cat = '" & cat & "' AND product_status = 1 ORDER BY product_cat, product_name"
ProdRs.Open sqlString
ProdRs.AbsolutePage = pg
While Not ProdRs.Eof and rowCount < ProdRs.PageSize
rowCount = rowCount + 1
%>
<div id="libri">
[img]<%=ProdRs("product_image")%>[/img]
<p class="datilibro">
<%=ProdRs("product_name")%>
Autore: <%=ProdRs("product_auth")%>
Casa Ed.: <%=ProdRs("product_casaed")%>
Collana: <%=ProdRs("product_coll")%>
Pagine: <%=ProdRs("product_npage")%>
Prezzo: <%=ProdRs("product_price")%> €
Lingua: <%=ProdRs("product_language")%>
Descrizione: <%=briefdesc%>
</p>
</div>
<%
ProdRs.MoveNext
Wend
'Imposto la navigazione per le pagine
If ProdRs.PageCount > 1 then
%>
<div class="artnav">
<table border="0" cellspacing="3" cellpadding="0">
<tr>
<td>Pagina successiva: <%=ProdRs.AbsolutePage%></td>
<td>Vai alla pagina</td>
<%
For i=1 to ProdRs.PageCount
If i <> cInt(pg) then
%>
<td><%=i%></td>
<%
else
%>
<td><%=i%></td>
<%
End If
Next
%>
</tr>
</table>
</div>
<%
End If
%>
apparte che al massimo sarà
visto che vuoi indicare la pagina successiva a quella che hai stampato...poi sinceramente se il recordset è vuoto magari l'absolutepage restituisce -1 (nella pagina manca un controllo in tal senso)...testa l'eof e vedi un pòcodice:<td>Pagina successiva: <%=ProdRs.AbsolutePage +1%></td>
![]()
IP-PBX management: http://www.easypbx.it
Old account: 2126 messages
Oldest account: 3559 messages