Pages and getRows

[ran_p]

Hi there,
I built a recursive forum (tree) with ASP (VBS) and getRows and the DB Microsoft Access.
When I tried to add a pages division (with ADO) it destroyed everything
The relevant code:


The ADO pages devision:

rs.PageSize = MessagesNum
rs.CacheSize = MessagesNum
If Not rs.EOF Then
PagesCount = rs.PageCount
rs.AbsolutePage = Page
arr = rs.getRows
End If


The loop that shows the main messages and calls the recursion:

Dim i, j
j = 0
i = 0
Do While Not i = UBound(arr,2) AND Not j = MessagesNum
If arr(iParentID,i) = 0 Then
Call ShowMessages(i,0)
Response.Write "<br>"
j = j + 1
End If
i = i + 1
Loop


MessagesNum is the number of main messages that I want in one page (10 in this case)
Page is the current page (comes from Request.Querystring)
iParentID contains the array index for approaching the parent message of the current messages.

Please help me,
ran_p.

[ran_p]

Anydoby? please..