VBA code false "rst.FindFist strSearch"

[Simon]

Dear reader,

I have the following code:

StrSearch = "[Employee_code] = " & strUser & ""

Employee_code is a text field with a numeric value like 41001

strUser has also a numeric value.

The next code results in an error message

Rst.FindFirst strSearch

The error message is "Data type mismatch in criteria expression".

How can I force that both are of the same data type.

Thanks for any help,

Simon

[pietlinden]

Simon wrote:

Dear reader,

I have the following code:

StrSearch = "[Employee_code] = " & strUser & ""

Employee_code is a text field with a numeric value like 41001

CONST cQUOTE As String = "'" '(single quote within double quotes)

strSearch = '[Employee_code] = cQUOTE & strUser & cQUOTE

[RoyVidar]

"Simon" <Sv********@Versatel.nlwrote in message
<45***********************@news.tele2.nl>:

Dear reader,

I have the following code:

StrSearch = "[Employee_code] = " & strUser & ""

Employee_code is a text field with a numeric value like 41001

strUser has also a numeric value.

The next code results in an error message

Rst.FindFirst strSearch

The error message is "Data type mismatch in criteria expression".

How can I force that both are of the same data type.

Thanks for any help,

Simon

Criterion on text fields need text delimiters. Try;

StrSearch = "[Employee_code] = '" & strUser & "'"

--
Roy-Vidar