Non riesco a riadattare la paginazione da access a MySql.
Ho provato in vari modi leggendo anche altri post ma senza successo.
Questo è il codice di partenza, come posso fare?
codice:<% RecordsPerPagina = 40 page = Cint(Request("page")) if page = "" then page = 1 SQL="select COUNT(*) from eventi order by eventiID desc" Set rsCount = connMySQL.execute(SQL) TotalRecords = Cint(rsCount(0)) rsCount.Close Set rs = Server.CreateObject("ADODB.Recordset") strSQL="select * from eventi order by eventiID desc" rs.Open strSQL,connMySQL,3,3 If TotalRecords = 0 then Response.Write "[/b] Nessun risultato trovato" Else 'paginazione rs.PageSize = RecordsPerPagina rs.AbsolutePage = page ''''ERRORE CON mySQL If TotalRecords > 0 then Response.Write "Pagina: " For p = 1 to rs.PageCount If p <> Page then Response.Write "<A href='admin.asp?page=" & p Response.Write p If p <> Page then Response.Write "</A> " Next End if %>

Rispondi quotando
