adodc simple question

[mel_flynn]

I have a combo box (cboNumber), when something is selected in the combo box I want to update the form accordingly.

cboNumber, txtName and txtCompany are all linked to adoData, therefore when something is selected in cboNumber I want txtName and txtCompany to be updated.

I have tried:

Private Sub cboNumber_Change()

adoData.Refresh

End Sub

but keep gettin a system error, which closes the application

I know it's a simple query, HELP.

[Memnoch1207]

Public Sub cboNumber Click()
adoData.CommandType = adCmdText
adoData.RecordSource ("SELECT * FROM table1 WHERE field1 = '" & cboNumber.Text '")
adoData.Refresh

See how this works.

[Dador]

Ok, so when you select something (ID Number?) in the combo box, you want it to go to the record and show the associated name and company?

I'll just throw this out there, though I could be way off track:

adoData.Recordsource = "SELECT Name, Company FROM TableName WHERE ID = '" & cboNumber.Text & "'"

adoData.Refresh

Where "Name" and "Company" are field names in your table called "TableName".

You may have a problem with your combo box being bound to your data control.

Anyway, it's a start.

**EDIT** Sigh, his is better above...

--Dador

[mel_flynn]

Thanks but I had tried that already and the ame thing is happening

When I go to chande the cboNumber it just bums me out of the application

[mel_flynn]

Actually when I have:

strSearch= "Select * From Table1 WHERE NumNo = '" & _
cboNumber.Text & "'"
With adoData
.RecordSource = strSearch
.Refresh
End With

I keep getting a Data Mismatch in Criteria Expression Error.

When I have:

adoData.Refresh

The System bums out

imelda