Run-time error 13: type mismatch

[ehe]

Hi Can anyone Help Please;

I am trying to select a record in a table base on 3 cretiria selected from a form. Everytime i use findfirst, i get an error "Run-time error 13: type mismatch. here is the code:

Dim db1 As DAO.Database
Dim rstHoldings As DAO.Recordset

Set db1 = CurrentDb

Trandate = Forms!frm_Transactions!Tran_Date
TranAcct = Forms!frm_Transactions!Tran_From_acct_ID
TranInstrmnt = Forms!frm_Transactions!Tran_Instrument_ID

Set rstHoldings = db1.openRecordset(“tbl_Instrument_Holdings”,dbOpen Dynaset)

rstHoldings.FindFirst "[HAcct_ID] = " &TranAcct And "[HInstrument_ID] = " & TranInstrmnt And"[Holdings_Date] =" & Trandate

THanks

[pbaldy]

Try

rstHoldings.FindFirst "[HAcct_ID] = " &TranAcct & " And [HInstrument_ID] = " & TranInstrmnt & " And[Holdings_Date] = #" & Trandate & "#"

[ehe]

Thanks a lot. That worked.

[pbaldy]

No problem, and welcome to the site by the way.