För kod. Som nästan alla kan är skap sql sat och recordset. och databaskoppling. Därför skriver jag bara recordset och till paging är fungerande.

PageNo = Trim(request.querystring("PageNo")
if PageNo = "" then
PageNo = 1
end if

' koden ovanför kollar om PageNo är tomt? Om det är tomt ge PageNo värde 1. annars säts inget värde.


set rst = server.createobject("adodb.RecOrdSet")
sql = sql fråga.
rst.open sql,con,1,2

'koden ovanför skapar sql frågan och kör sql fråga och skapar objeketet RecOrdSet som krävs
Hanterar sql fråga och öppnar och skapar recordset.
nu till pagin koden.


rst.PageSize = 10
rst.AbsolutePage = NoPage

' Koden sätter att 10 poster per sida.