Navigation Buttons

[alxj]

I have turned off the standard navigation buttons so i can produce my own custom nav. bar out of command buttons. The problem i have is that when you turn the nav. buttons off you have no way of scrolling through results from a form filter. The number of records within the form is also no longer shown. i.e. 1 of 45
is there away to reporduce this result in a floating format so i can reposition it on th page.

Thanks for your Help

Alex

 

[R. Hicks]

Alex, check your email, I sent you a sample that should help.

HTH
RDH

[This message has been edited by R. Hicks (edited 12-10-2000).]

 

[alxj]

thanks again my friend

 

[veedub]

Hello

Alex, check your email, I sent you a sample that should help.

HTH
RDH

[This message has been edited by R. Hicks (edited 12-10-2000).]

Hi I'm Julie

Hope it's not too cheeky but can you forward me the sample too? Would be very grateful.

All the best
Jules - Bristol, England

 

[Mile-O]

Hi I'm Julie

Hope it's not too cheeky but can you forward me the sample too? Would be very grateful.

You might not be cheeky but that sample was sent four years ago.

There's a thread here with code for custom navigation buttons.

 

[veedub]

You might not be cheeky but that sample was sent four years ago.

There's a thread here with code for custom navigation buttons.

Oh well - I got a result.

Cheers
J

 

[ghudson]

Try this in your forms OnCurrent event...

Private Sub Form_Current()

    If Me.NewRecord Then
        Me.Form.Caption = "Your Form Name - New Record (" & Me.RecordsetClone.RecordCount & " existing records)"
    Else
        Me.Form.Caption = "Your Form Name - Record " & [CurrentRecord] & " of " & Me.RecordsetClone.RecordCount
    End If

End Sub

 

[porterbe]

Try this in your forms OnCurrent event...

Private Sub Form_Current()

    If Me.NewRecord Then
        Me.Form.Caption = "Your Form Name - New Record (" & Me.RecordsetClone.RecordCount & " existing records)"
    Else
        Me.Form.Caption = "Your Form Name - Record " & [CurrentRecord] & " of " & Me.RecordsetClone.RecordCount
    End If

End Sub

Anybody have any idea how to implement this on a subform?

I have put the code above into the MainForm OnCurrent event based on the subform event model in the MSDN documents, and changed the references to the recordset to point to the subform recordset, but the numbers returned are wrong (I have also noticed that the # of records in the SubForm Nav Bar does not appear immediately the Main Form record is changed).

All ideas appreciated, I will continue to look through this forum and apologies in advance if it's already been covered...

Bernie

 

[ghudson]

Put that code as well in the subforms OnCurrent event and you will have to have a label in the subform to display the record count.

You need to refresh [requery] your record set [form and/or sub form] if you are not seeing the changes after the record was saved.