No Value Given

[SAMS]

Hello, I got this code below i don't know what actually is wrong with it as it keep
giving me error (No Value Given). Seen like it could not extract the value (which is in Text format) from the text box.

Adodc2.RecordSource = "select ven.*, claim.*
from claim, ven where ven.field1 = claim.vendor and claim.hpcode = " & Text67.Text & ""
Adodc2.Refresh

Thks & regards.

[smalig]

If your claim.hpcode is text field then you must use <'>:
claim.hpcode = '" & Text67.Text & "'"

[This message has been edited by smalig (edited 10-18-1999).]

[SAMS]

ok thanks, Smalig. Is there a way to assign the recordsource of data object in code?

e.g:
data3.recordsource = '" & text67.text & "'

This is incorrect.
What is the complete statement? Cause seen like this statement is wrong. Thks.

[c@lle]

use this:
set data3.recordsource = blabla

so you initializes the datacontrol with the new recordset.

[Clunietp]

don't forget to refresh the RS after assigning a table to it... data1.refresh

[SAMS]

Thks a lot.