Syntax error in critera expression

[MaggieLeatherman]

Hello!
These 2 commands work perfectly by themselves!

DoCmd.OpenReport stDocName, acPreview, , "[BuildingIDFK] = " & Me.txtBuildingID
DoCmd.OpenReport stDocName, acPreview, , "([Percentasbestos] like '*%*' or [Percentasbestos] = 'ACM')"

But I need the criteria together in on OpenReport command. Below I put both the criteria stmts together from above and just separated them with the word 'and'. Now getting
"Type Mismatch" error and the report won't open. Can you help?


DoCmd.OpenReport stDocName, acViewPreview, , "[BuildingIDFK] = " & Me.txtBuildingID And "([Percentasbestos] like '*%*' or [Percentasbestos] = 'ACM')"


Thanks as always for your assistance! Maggie

 

[TheAceMan1]

How are ya MaggieLeatherman . . .
. . . abd this:

[blue]   Dim Criteria As String
   
   Criteria = "[BuildingIDFK] = " & Me.txtBuildingID & " And " & _
              "([Percentasbestos] like '*%*' or [Percentasbestos] = 'ACM')"
   DoCmd.OpenReport stDocName, acViewPreview, , Criteria[/blue]

See Ya! . . . . . .

 

[MaggieLeatherman]

Hi AceMan, Thanks for your help, I have so much trouble with syntax in criteria! Maggie