Problema ad impaginare record

[flash20]

Ciao a tutti, sto usando il seguente codice per impaginare dei record:

<%
Record_Pagina =50
Numerazione_Max = 10

sql="select * from muro order by codice desc"

Set Rec = Server.CreateObject ("ADODB.Recordset")
Rec.PageSize = Record_Pagina
Rec.Open sql, Conn, 3, 3


Pag = CInt(Request.Querystring("pag"))


If (Not Rec.Eof) Then
If Pag>Rec.PageCount Then
Pag = Rec.PageCount
End If
If Pag = 0 Then
Pag = 1
End If


Rec.AbsolutePage = Pag


indice_inizio = pag-(Numerazione_Max/2)
If (indice_inizio>(Rec.PageCount-Numerazione_Max)) Then
indice_inizio = Rec.PageCount-Numerazione_Max+1
End If
If (indice_inizio<=0) Then
indice_inizio = 1
End if
indice_fine=indice_inizio+Numerazione_Max-1
If (indice_fine>Rec.PageCount) Then
indice_fine = Rec.PageCount
End If
%>

Ma mi da il seguente errore:

ADODB.Recordset error '800a0bb9'

Gli argomenti non sono di tipo valido, non sono compresi nell'intervallo consentito o sono in conflitto.

/home.asp, line 80



La linea 80 corrisponde a: Rec.AbsolutePage = Pag



Dove può essere l'errore? (Ho riportato soltanto il codice interessato)

[santino83_11_04]

prima di questo

If (Not Rec.Eof) Then
If Pag>Rec.PageCount Then
Pag = Rec.PageCount
End If
If Pag = 0 Then
Pag = 1
End If

metti:

Rec.PageSize=Record_Pagina

[flash20]

Mi da lo stesso errore

[santino83_11_04]

ma se stampi pag che cosa ti appare?

[flash20]

scrive -1

[santino83_11_04]

If Pag <= 0 Then
Pag = 1
End If

chissà perchè dà -1....

[flash20]

Adesso da il seguente errore:

ADODB.Recordset error '800a0cb3'

Il set di record corrente non supporta i segnalibri. Potrebbe trattarsi di una limitazione del provider o del tipo di cursore selezionato.

/home.asp, line 80


e la linea 80 è sempre: Rec.AbsolutePage = Pag

[santino83_11_04]

intanto passiamo da questa:

Set Rec = Server.CreateObject ("ADODB.Recordset")
Rec.PageSize = Record_Pagina
Rec.Open sql, Conn, 3, 3

a questa:

Set Rec = Server.CreateObject ("ADODB.Recordset")
Rec.Open sql, Conn, 1, 3  'oppure 3,3

poi fai

if (not Rec.eof) then

Rec.PageSize=Record_Pagina

...

ma la connessione è aperta? (si) database access vero?

[flash20]

Il database è MySql


ma questo:

if (not Rec.eof) then

Rec.PageSize=Record_Pagina

dove lo devo mettere?

[santino83_11_04]

Originariamente inviato da flash20
Il database è MySql


ma questo:

if (not Rec.eof) then

Rec.PageSize=Record_Pagina

dove lo devo mettere?

scusa ma se il database è MySql ma perchè non usi il LIMIT nella query come tutti?

http://www.risorse.net/magazine/leggi.asp/id-104