Requery Combo Box Issue

[ralphralph07]

Hi

I have combo box on a form called SourceID and a command button that opens the Frm_Source if a user needs to add a new record.

when the Frm_Source form is closed the SourceID Combobox doesn't refresh? My current code is:

Private Sub Cmd_AddSource_Click()
    DoCmd.OpenForm "Frm_SourceClaim", acNormal
    DoCmd.GoToRecord , , acNewRec
    Me.SourceID.Requery

I've tried putting the openform as a dialog but this then refreshes the whole form and sets me on a new record?

Thanks for any pointers

Ralph

 

[PHV]

You may try this:
DoCmd.OpenForm "Frm_SourceClaim", acNormal, , , acFormAdd, acDialog
DoEvents
Me!SourceID.Requery

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[TheAceMan1]

ralphralph07 . . .

So you understand, your code keeps running asychronously with opening of the form! [blue]PHV's[/blue] suggestion opens the form [purple]modal[/purple] (your code stops running until [blue]Frm_SourceClaim[/blue] is closed) . . .

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[ralphralph07]

Hi

Thanks you both for your help and comments

Ralph

 

[ralphralph07]

Hi
I've just retested the code and it does refresh the combobox but doesn't keep on the record that the user was inputting - it jumps to a new record or a previous record.

How can i ensure that when I close form that the main form doesnt change record?

This is the code:

    DoCmd.OpenForm "Frm_ClientSingle", acNormal, , , acFormAdd, acDialog
    DoCmd.GoToRecord , , acNewRec
    DoEvents
    Me!ClientID.Requery

Thanks for all the help

Ralph

 

[PHV]

Get rid of this line:
DoCmd.GoToRecord , , acNewRec

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[ralphralph07]

Thank you that's done the trick!

Ralph