Databound combo generates list of a second databound combo

Hi all,

I am looking for a solution to the following scenario: I create a combo 'market1' which is databound to DataMarket1, let's say this combo has 10 items, I would like that when the user selects one item 'Computers and telecoms' it generates the list of combo 'market2' with item1 'computers' and item2 'telecoms'.

I tried using a table which has both columns 'market1' and 'market2' as follows:

ID - market1 - market 2
1 - computers and telecoms - computers
2 - computers and telecoms - telecoms

I tried to use the following SQL statement for DataMarket2:

SQLstrActivite2 = "SELECT * FROM [CMBSRC_Market2] WHERE Market1=" & "'" & DBCmbMarkete1.BoundText & "'"

For some reason this does not work and I keep getting error messages.

Some light would be welcome on this scenario...

Thanks,
Julien

SQLstrActivite2 = "SELECT * FROM [CMBSRC_Market2] WHERE Market1=" & "'" & DBCmbMarkete1.BoundText & "'"



your code should be like this :

SQLstrActivite2 = "SELECT * FROM [CMBSRC_Market2] WHERE Market1=' " & DBCmbMarkete1.BoundText & " ' "

It tells me 'data type mismatch in criteria expression' in VB when I run the app.

The strange thing is that when I run the SQL statement in Visdata it works fine with a parameter 1 instead of DBCmbMarket1.BoundText.

If I use a parameter 1 in VB I get the same 'data type mismatch' error message.

Julien

Is the column Market1 a numeric datatype? If so, eliminate the single quote marks from Joe77's example and try that.

Indeed DBCmbMarket1 is a databound dropdown and therefore contains a numeric value which is translated to a text value: the user sees text such as "Computers & Telecoms" but the value is 1.

If I remove the single quotes there is an additional error message which is: Too few parameters. Expected 1.

Julien

Sounds like a typo in a field or table name now. Double check that all are spelled correctly.

Yes, I used: SQLstrMarket2 = "SELECT * FROM [CMBSRC_Market2] WHERE Market1=" & DBCmbMarket1.BoundText & ""

Again, it works in Visdata with a numeric value.

Julien

Well you could try using cInt() or cLng() on the DBCmbMarket1.BoundText and see if that takes care of it for you.