I have a form that contains 1 combo box and 2 unbound text fields. My question is with the following code, I get the text fields to fill based on the combo box selection, but the text fields are the same as I scroll through the records.
How do I get the text fields to stay and update the table for each particular record.
Any help is greatly appreciated.
Here is the code for the combo box:
Private Sub Agency_AfterUpdate()
Me.tmpid.Value = Me.Agency.Column(1)
Me.tmploc.Value = Me.Agency.Column(2)
DoCmd.Requery "tmpid"
DoCmd.Requery "tmploc"
End Sub
How do I get the text fields to stay and update the table for each particular record.
Any help is greatly appreciated.
Here is the code for the combo box:
Private Sub Agency_AfterUpdate()
Me.tmpid.Value = Me.Agency.Column(1)
Me.tmploc.Value = Me.Agency.Column(2)
DoCmd.Requery "tmpid"
DoCmd.Requery "tmploc"
End Sub