Access 2000 VBA SELECT / WHERE (multiple) 1

[DWSwaim]

Multiple WHERE arguments.
I have seen multiple WHERE values used but I am having problems getting VBA to accept my attempts. Does Acess/VBA support this option? My code looks like this:

strSQL = "SELECT * FROM [Recruitment Event History] WHERE Recruitment_Location_ID = " & intLocation & " and Recruitment_Term = " & strTerm & " and Recruitment_Year =" & intYear

Set qdfstrQname = dbsDatabase.CreateQueryDef(strQname, strSQL)

I've tried different variations of this code but no luck so far.
Thanks
Darrell

 

[Tranman]

Darrell,
You need quotes around the character criterion:

strSQL = "SELECT * FROM [Recruitment Event History] WHERE Recruitment_Location_ID = " & intLocation & " and Recruitment_Term = '" & strTerm & "' and Recruitment_Year =" & intYear

(Note the single quotes inserted before and after strTerm)

Let me know if this doesn't work.
Tranman