Counting records

[JanesC]

How do i get Access to display "Record 2 of 10 records" on a form. At the moment I've got it to display the total number of records using this control source:
=" (" & Count(*) & " " & IIf(Count(*)=1,"record"," records&quot & &quot"
(This may seem a strange thing to want to do, but i don't want the users to see the navigation buttons.)

 

[PaulF]

This code uses a Label (named lblRecNo) on the Form to display the info you want, but in a different manner.


Private Sub Form_Current()
Dim rst As DAO.Recordset
Set rst = Me.RecordsetClone
rst.MoveLast
With rst
rst.Bookmark = Me.Bookmark
Me.lblRecNo.Caption = (rst.AbsolutePosition + 1) & " of " & rst.RecordCount
End With
End Sub

PaulF

 

[JanesC]

Hi PaulF

I'm sorry that doesn't seem to work, i get this message

Compile error:
User-defined type not defined

is it something i've done??

 

[PaulF]

this code is for Access 97

PaulF

 

[scking]

You should tell us what variable gave you that error. I might assume you are using Access 2000 and it is the Dim rst As DAO.Recordset. This would be because you have not set the reference to the DAO Compatability Library 3.5. Open a module and go to tools\references. Find the correct reference, check it and return to the module.

Steve King Growth follows a healthy professional curiosity