M
mccoy
i created a sync combo box copying from a sample database
but the problem is i cannot get the right criteria for the second cbo
because the format of the first cbo is like "09-001" the result of the query
on my second combo only reflects as 9-1
ihave used the format function
but cannot get the right result
Private Sub cboSONUMBER_AfterUpdate()
Dim sitemSource As String
sitemSource = "SELECT [MONITORING].[SO], [MONITORING].[PROJECT],
[MONITORING].[REMARKS] " & _
"FROM MONITORING " & _
"WHERE [SO] = " & Format(Forms![CBOFILTER]!
cboSONUMBER, "00-000")
Me.cboitemdesc.RowSource = sitemSource
Me.cboitemdesc.Requery
please help
but the problem is i cannot get the right criteria for the second cbo
because the format of the first cbo is like "09-001" the result of the query
on my second combo only reflects as 9-1
ihave used the format function
but cannot get the right result
Private Sub cboSONUMBER_AfterUpdate()
Dim sitemSource As String
sitemSource = "SELECT [MONITORING].[SO], [MONITORING].[PROJECT],
[MONITORING].[REMARKS] " & _
"FROM MONITORING " & _
"WHERE [SO] = " & Format(Forms![CBOFILTER]!
cboSONUMBER, "00-000")
Me.cboitemdesc.RowSource = sitemSource
Me.cboitemdesc.Requery
please help