Paging Problem in ASP

[saviomf]

Hi all, I have a problem with my paging script. The first time it executes, (say it gives 5 pages of records), it will display 1 of 5 but when i click on the next button, it gives 1 of 1 . Please can someone help.

    pagenum            = Session("pagenum")
    pagecnt            = Session("pagecnt")
 
Call displayRecords()
 
+++++++++++++++
 
Sub displayRecords()
        ' SET NUMBER OF records TO DISPLAY PER PAGE
        PerPage = 10
 
        rsSelect = "Select aID, Name, price FROM tblA"
        Set rsHCheck = Server.CreateObject("ADODB.RecordSet")
        rsH.PageSize = PerPage
        rsH.CursorLocation = 3
        rsH.Open rsSelect, oConn
 
 
       ' session("pagecnt") = pagecnt
        Response.Write "pagenum: " & pagenum & "<br />"
        Response.Write "pagecnt: " & pagecnt & "<br />"
 
 
 
        If rsH.EOF Then
               pagecnt = rsH.pageCount
            Response.Write "pagecnt if EOF: " & pagecnt & "<br />"
            Call displayPaging(pagenum, pagecnt)
            Call displayBoardTypes()
 
                Response.Write("<p style='margin-left: 30px;'>We could not find any records matching your search criteria.</p>")
 
        Else
            rsH.AbsolutePage = pagenum
            pagecnt = rsH.pageCount
            Response.Write "pagecnt if not eof: " & pagecnt & "<br />"
 
            Call displayPaging(pagenum, pagecnt)
 
 
            For k = 1 To PerPage
                If Not rsH.EOF Then
                    response.write" blah blah" 
 
                    End Select
 
                rsH.MoveNext
               End If
           Next
 
        Response.Write "pagecnt if not eof: " & pagecnt & "<br />"
 
 
        Call displayPaging(pagenum, pagecnt)
 
        End If
        pagecnt = rsH.pageCount
        Response.Write "pagecnt: " & pagecnt & "<br />"
 
        Set rsH = Nothing
End Sub
+++++++++++++++++++++++++++++++++++++++++
 
 
Sub displayPaging(pagenum, pagecnt)
        ' SET PREVIOUS PAGE
        prevPage = "&laquo; Prev page&nbsp;&nbsp;"
        If pagenum >= 2 Then prevPage = "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=""javascript:showRecords(" " & pagenum - 1 & ", " & pagecnt & ")"" >&laquo; Prev page&nbsp;&nbsp;</a>"
 
 
        ' SET NEXT PAGE
        Response.Write ("    pagecnt:   "& Trim( pagecnt ) & "</br />" & vbcrlf)
        nextPage = "&nbsp;&nbsp;Next page &raquo;"
        If Trim( pagenum ) <> Trim( pagecnt ) Then nextPage = "&nbsp;&nbsp;<a href=""javascript:showHotels(" & pagenum + 1 & " , " & pagecnt & ")"">Next page &raquo;</a>"
 
        Response.Write ("<div class='paging'>" & vbcrlf)
        Response.Write ("    <div class='middle'>Displaying page <strong>"& pagenum & "</strong> of <strong>" & pagecnt & "</strong></div>" & vbcrlf)
        Response.Write ("    <div class='prev'>"& prevPage & "</div>" & vbcrlf)
        Response.Write ("    <div class='next'>"& nextPage & "</div>" & vbcrlf)
 
    End Sub
 

++++++++++++++++++++++++++++++++++++++++++++

[Reklawthgin]

If you simply wish to display several records on a page at a time and have paging, then let ASP.NET controls do the work for you!

Say,

1. create a SqlDataSource control, set it's connection to which ever connection is in your web.config file.
   Next, choose either the table and fields you wish to bind to or use a stored procedure.
   Once your able to establish a connection to your data, simply use a control such as a "FormsView" control. Enable paging, set the page size limit, set it's datasource to the sqldatasource you created and wah lah! Or you may use the GridView control as well. I prefer the FormsView because you can customize your appearance and layout more easily, such as displaying in tables and such.

A possible cause of such problem is keeping track of variables on the page, and often times, when the page is refreshed, variables are lost therefore losing the sync between pages and your pager control.

Hope this helps.

[jhardman]

it looks like the pagecount is saved as a sessioni-level variable, which is generally a pretty safe way to save it. I noticed though that line 19 which appears to save this data is commented out. I don't see any other line where this data is affected. Perhaps uncommenting this line would sove this problem, however I admit that I didn't read through the code very thoroughly.

Jared