In the following I am a bit stuck - I need it to make sure it only selects records that Current Status = "Open"
Having hard job of putting this in as well, cos my VB skills are in need of work.
In my cboLocation afterupdate event -
QUOTE
Private Sub cboLocation_AfterUpdate()
Dim sLocationSource As String
sLocationSource = "SELECT [tblLocationTrial].[LocationTrialID], [tblLocationTrial].[locationFK], [tblLocationTrial].[CurrentStatus] " & _
"FROM tblLocationTrial " & _
"WHERE [locationFK] = " & Me.cboLocation.Value
Problem is also below - this combo is on a subform and needs to set the combo rowsource
of another combo on the mainform in a different tab control.
Me.cboTrial.RowSource = sLocationSource
Me.cboTrial.Requery
End Sub
Dim sLocationSource As String
sLocationSource = "SELECT [tblLocationTrial].[LocationTrialID], [tblLocationTrial].[locationFK], [tblLocationTrial].[CurrentStatus] " & _
"FROM tblLocationTrial " & _
"WHERE [locationFK] = " & Me.cboLocation.Value
Problem is also below - this combo is on a subform and needs to set the combo rowsource
of another combo on the mainform in a different tab control.
Me.cboTrial.RowSource = sLocationSource
Me.cboTrial.Requery
End Sub
Thanks in advance!
