Page Scroller

[Gatorajc]

How would I go about making only x amount of records show out of Y records on a page and have buttons to move to the next page.

For example. So 100 records come out of a DB. I only want 25 to display per page. AJ
I would lose my head if it wasn't attached.

 

[ehsant]

Hi ...
its easy ... you just have to define Pagesize and cachesize for your Recordset and then set your absolut page to the page number which you want :

Pagesize = 25
CurPage = 2

RS.CacheSize = PageSize
RS.MoveFirst ()
RS.PageSize = PageSize

TotalPages = cInt(RS.PageCount)
If CurPage > TotalPages Then
CurPage = TotalPages
End IF

'Set the absolute page
RS.AbsolutePage = CurPage
----
TNX.
E.T.