Riadattare la paginazione per MySql

[asch]

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?

<%
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
%>