"Mandy" wrote in message
...
How can I pass the displayed value in a combo box to the WHERE clause of a
SQL query in another combo box?

This is the bit of code it gets stuck on.
With cd2
Set .ActiveConnection = cn2
.CommandText = "SELECT distinct(PONo) FROM POdata WHERE LCNo =
ComboBox.cboLCNos.Value"
.CommandType = adCmdText
Set rst2 = .Execute
End With

I get an Automation error and it highlights - Set rst2 = .Execute -
If I replace ComboBox.cboLCNos.Value with 'IMPLC3679' (a string in the
LCNo field) it works.
Thank you for any assistance you can give.


..CommandText = "SELECT distinct(PONo) FROM POdata WHERE LCNo = " &
ComboBox.cboLCNos.Value

Paul D