Type mismatch from SQL statement inside VBA

[DRH192]

Can anyone see why the following line

Set Rst = Dbs.OpenRecordset("SELECT TOP 5 tblInvestigation.InvestigationID, tblInvestigation.Agent, tblInvestigation.MailType FROM tblInvestigation WHERE ((tblInvestigation.MailType)= 10);")

would return the error code 13 "Type Mismatch"?

I copied this SQL statement into a query and it works as I would expect pulling back the top 5 records.

Cheers

 

[Crowley16]

is rst ado or dao?
and what is dbs set to?

--------------------
Procrastinate Now!

 

[Golom]

Is the data type of "MailType" Text rather than Number? If so perhaps you need

WHERE ((tblInvestigation.MailType)= [COLOR=red]'[/color]10[COLOR=red]'[/color]);")

[small]No! No! You're not thinking ... you're only being logical.
- Neils Bohr[/small]

 

[PHV]

hopefully you omitted to post the following ?
Dim dbs As Database
Dim rst As DAO.Recordset
Set dbs = CurrentDB

And in the VBE menu Tools -> References ... you have the Microsoft DAO 3.# Object Library ticked ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886