combo form filter

[ljg08]

Can anyone help with this issue please

I have a form to list clients. On the form I have a combo box with a list of
events

I want the users to select an event from the combo box and filter the fom
data to list just the clients interested in this event.

I have a text box on the form [txteventID] which gets the value of the combo
selection

Private Sub cboevent_AfterUpdate()
Me.txteventlID = Me.cboevent
End Sub

and have tried :

SELECT tblcontact.userID, tblcontact.eventlID, tblcontact.contact_last,
tblcontact.contact_first
FROM tblcontact
WHERE (((tblcontact.referalID)=[Forms]![frmEvents]![txteventlID]));

Whilts the value fills the text box the data is not filtered?

 

[Douglas J. Steele]

If the SQL you're showing is the RecordSource of your form, you need to
requery the form:

Private Sub cboevent_AfterUpdate()
Me.txteventlID = Me.cboevent
Me.Requery
End Sub

I don't see the point of the text box, though, to be honest, Why not simply
refer to the combo box in your SQL? (You'd still need the requery)

 

[lez]

Cheers, Thanks for that Douglas..doh....I knew it would be something simple.

I have taken the text box out now. I only had that their to act as a source,
and make sure the value was being passed.

Many thanks

If the SQL you're showing is the RecordSource of your form, you need to
requery the form:

Private Sub cboevent_AfterUpdate()
Me.txteventlID = Me.cboevent
Me.Requery
End Sub

I don't see the point of the text box, though, to be honest, Why not
simply refer to the combo box in your SQL? (You'd still need the requery)

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)

Can anyone help with this issue please

I have a form to list clients. On the form I have a combo box with a list
of events

I want the users to select an event from the combo box and filter the
fom data to list just the clients interested in this event.

I have a text box on the form [txteventID] which gets the value of the
combo selection

Private Sub cboevent_AfterUpdate()
Me.txteventlID = Me.cboevent
End Sub

and have tried :

SELECT tblcontact.userID, tblcontact.eventlID, tblcontact.contact_last,
tblcontact.contact_first
FROM tblcontact
WHERE (((tblcontact.referalID)=[Forms]![frmEvents]![txteventlID]));

Whilts the value fills the text box the data is not filtered?