Subform Data Based on Query not displaying (1 Viewer)

I have a form with 2 combo box and 3 subforms.


I want the subforms to display data based on queries using criteria from the combo boxes. I am using an after update even on the 2nd combo box.


I want to use the queries as I would like to use the subforms on different main forms.



The queries run, but I can't get the data to display.


I've attached the database.



Here is the code I'm using:


Private Sub cmbSubmittal_AfterUpdate()
Dim strSQL As String
Dim strSQLC As String
Dim strSQLL As String

strSQL = "SELECT * FROM qrySubReply WHERE qrySubReply.Job = " & [Forms]![frmSubmittalUpdate2]![Contract] & " AND qrySubReply.SerialNumber = " & [Forms]![frmSubmittalUpdate2]![cmbSubmittal] & ";"

strSQLC = "SELECT * FROM qrySubReplyCriteria WHERE qrySubReplyCriteria.Job = " & [Forms]![frmSubmittalUpdate2]![Contract] & " AND qrySubReplyCriteria.SerialNumber = " & [Forms]![frmSubmittalUpdate2]![cmbSubmittal] & ";"

strSQLL = "SELECT * FROM qrySubReplyLink WHERE qrySubReplyLink.Job = " & [Forms]![frmSubmittalUpdate2]![Contract] & " AND qrySubReplyLink.SerialNumber = " & [Forms]![frmSubmittalUpdate2]![cmbSubmittal] & ";"

Me.Refresh
Me.txtDescrition.Value = Me.cmbSubmittal.Column(1)
Me.txtStatus.Value = Me.cmbSubmittal.Column(3)
Me.frmSubmittalReplyEntryUpdate2.Visible = True
Me.frmSubmittalReplyEntryUpdate2.Form.RecordSource = strSQL
Me.frmSubmittalReplyEntryUpdate2.Requery
Me.frmSubmittalsLinkReply.Visible = True
Me.frmSubmittalsLinkReply.Form.RecordSource = strSQLL
Me.frmSubmittalsLinkReply.Requery
Me.frmSubmittalCriteria.Visible = True
Me.frmSubmittalCriteria.Form.RecordSource = strSQLC
Me.frmSubmittalCriteria.Form.Requery
End Sub

You haven't allowed for the datatype of your criteria. So where the Job type is text you need your sql to read;
Note the addition of the quotes to indicate the text delimiters.

I haven't checked the rest but you should see the difference.

I've added the debug statements so you can see what Access sees when it tries to run your queries. Cut and paste the SQL into a query designer and then run the query - no results with your original query.

Thanks! Works like a charm.