Please Help with "Select...From" statement

[ALaurie10]

I am trying to write a "Select and From Statement but keep getting error 214727900 and my VBA points to the .Open Options:=acCmdT able. I am referencing a table in my Select. Can someone help me out. Many Thanks in advance.



With TBLGapApprovedC ostNew
.source = "SELECT TBLGapApprovedC osts.* From TBLGapApprovedC osts Where " _
& "TBLGapApproved Costs.Applicati on_Number='Numb er';"
.ActiveConnecti on = CurrentProject. Connection
.CursorType = adOpenStatic
.LockType = adLockOptimisti c
.CursorLocation = adUseClient
.Open Options:=adCmdT able
End With