need help finding a record using vb .Find

[marnold37341]

I have an Access 2000 table that is ordered by RecapEmpID and RecapDate. I have also set up a multi-field index, RecapIndex, using the above two fields. I'm getting to the table using ADODB, and have "accessed" this table, as well as others, successfully. However, all my record management has been .MoveFirst, .MoveNext, etc.

Searching thru this 10,000 + record set is not efficiently accomplished using .MoveFirst, .MoveNext - consequently I want to use .Find

Here's my .Find line

.Find "RecapEmpID = ThisRecordEmpID"

When running my VB Code, I get the following run-time error:

Run-time error '3001':

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

Both the field in the table (RecapEmpID) and my variable (ThisRecordEmpID) are defined as Long Integer. There are 35 records in the table with the EmpID I am supplying.

Any help on what I'm doing wrong would be greatly appreciated.

Mickey Arnold
marnold37341@yahoo.com

 

[papparuff]

change

.Find "RecapEmpID = ThisRecordEmpID"

to
' if RecapEmpID is number
.Find "RecapEmpID = " & ThisRecordEmpID

' if RecapEmpID is text
.Find "RecapEmpID = '" & ThisRecordEmpID & "'" John Ruff - The Eternal Optimist

 

[marnold37341]

Thanks papparuff - your solution worked perfectly!!