Record x of y not calculating on form open

[Wrathchild]

Hi, I got this code for the "record x of y" display from a post here, but it only works AFTER I click on the navigation button. When the form opens, the display is incorrect. Once I click on the next record button, it works fine. any ideas? this is what I'm using:

Private Sub Form_Current()

Dim dbs As Recordset
Set dbs = Me.RecordsetClone
dbs.Bookmark = Me.Bookmark
Me.txt_record = dbs.RecordCount
Me.txt_ofrecord = dbs.AbsolutePosition + 1

thanks!

 

[ChrisBelzona]

Hi

I had the problem also, wired thing is it doesn't work for one set of criteria but does for others, the only way I got round it was when the form opens move to the last record and then back to the first, users hardly see it happen.

Chris