I am relativley new to ASP and have hit a slight problem and seeking help.
Based on a combination of code from Wrox's Professional ASP 3 and ASP 3 Programmers Reference books I have constructed a page for listing records from a database that pages through the records to show 5 records on each page and at the bottom of the page is previous and next buttons with text showing page X of Y.

All works well until I reach the last page when the number of records is less than the pageSize variable (eg the number records remaining is 3 and pageSize is set to 5) when I get an exception error.

I have constructed this using a pageSize variable and a counter variable in a Do While loop to iterate through the records. But it seems what's missing is some way of telling the loop that it has reached an end of file. The error is generated when it reaches the first vairable in the recordset when there are less than 5 records left to view. I have included some of my code to help illustrate this.

My question(s) is am I using the right method for dispalying these records? and is there some way I can include an EOF ? This code works well if the pageSize variable is set to 1 (ie display one record on each page)

initially varCount is set to 1 and pageSize is set to 5.

Do while varCount <= rsData.pageSize
Response.Write("<tr align=""center"" bordercolor=""#ffffff"">")
    if session("PersonID") <> "" then
    response.Write("<td><a class=""links1"" href=""browse.asp?Action=Edit&Item=" &

rsData("CaseID") & """>" &_
    rsData("CaseID") & "</a></td>")
    else
    Response.Write("<td>" & rsData("CaseID") & "</td>")
    end if
Response.Write(" <td class=""bodycopy1"">" & rsData("Title") & "</td>" &_
            " <td class=""bodycopy1"">" & rsData("ProjectManager") & "</td>" &_
            " <td class=""bodycopy1"">" & rsData("BuildingName") & "</td>" &_
            " <td class=""bodycopy1"">" &

FormatDatetime(rsData("ListingDate"),2) & "</td>" &_
            " <td class=""bodycopy1"">" & rsData("ItemStatus") & "</td></tr>")

    varCount = varCount + 1
    rsData.MoveNext
    loop

You can put the EOF checking code as given below. Put an if condition next to your DO WHILE and close that before LOOP statement.
That should work.

Do while varCount <= rsData.pageSize
   IF NOT rsData.EOF THEN
        ...
        ...
        ...
        rsData.MoveNext
    END IF
loop

Cheers!

-Vijay G

Actually you can add that condition to your DO WHILE itself. No need of IF there. The problem with the IF condition as given in my previous post is, even after reaching the EOF, untill VARCOUNT becomes > than PAGESIZE, it would loop through unnecessarily. As in your case the PAGESIZE is 5, one would not see any big effect. When it is changed to a bigger value, it could affect the performance. To avoid that you may check for NOT EOF in DO WHILE itself.

Do while varCount <= rsData.pageSize and NOT rsData.EOF
        ...
        ...
        ...
        rsData.MoveNext
loop

Cheers!

-Vijay G

Just tried your second suggestion and works beautifully. Thanks for your help

regards
Sparky