I'm seeing this problem come up with other programmers I have fixed 

everything that I can see and I still am getting -1 value for pagecount.I 

am programming on windows 2000 server with access 2000. Here is my



Set rsData = Server.CreateObject("ADODB.Recordset")



  ' set the page size

  rsData.PageSize = 10

  rsData.CursorLocation = adUseClient



  ' open the data

rsData.Open "registration",CONNSTRING_,adOpenStatic,adLockReadOnly,

adCmdTable



 ' get the requested data

  If Request.QueryString("PAGE") = "" Then

    iPage = 1

  Else

    ' protect against out of range pages, in case

    ' of a user specified page number

    If iPage < 1 Then

      iPage = 1

    Else

      If iPage > rsData.PageCount Then

        iPage = rsData.PageCount

      Else

        iPage = CInt(Request.QueryString("PAGE"))

      End If

    End If

  End If



  ' set the page

  rsData.AbsolutePage = iPage

  response.write(rsData.PageCount)