Syntax Error (missing operator) in query expression

[Lumpierbritches]

Syntax Error (missing operator) in query expression [AnimalID]=BLANK'S
MOLLIE-PRINCE BRUISER-3/14/2004-03

AnimalID is correct. I'm trying to open with a command button or double click
the frmAnimal from a subform that uses the same table, is that my problem?

If I remove the criteria from the expression, it opens the form, but to show
every record.
Michael

[Bob Quintal]

lu************* @aol.com (Lumpierbritche s) wrote in
news:20******** *************** ****@mb-m16.aol.com:

Syntax Error (missing operator) in query expression
[AnimalID]=BLANK'S MOLLIE-PRINCE BRUISER-3/14/2004-03

AnimalID is correct. I'm trying to open with a command button
or double click the frmAnimal from a subform that uses the
same table, is that my problem?

If I remove the criteria from the expression, it opens the
form, but to show every record.
Michael

Iwhat you need to see is
[AnimalID]="BLANK'S MOLLIE-PRINCE BRUISER-3/14/2004-03"

review the location in the button's OnClick event to add extra
quotes. If you can't figure it out, post the relevant sections of
code.

Bob Quintal

[Lumpierbritches]

Private Sub cmdOpenAnimal_C lick()
On Error GoTo Err_cmdOpenAnim al_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmAnimal"

stLinkCriteria = "[AnimalID]=" & "'" & Me![AnimalID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdOpenAni mal_Click:
Exit Sub

Err_cmdOpenAnim al_Click:
MsgBox err.Description
Resume Exit_cmdOpenAni mal_Click

End Sub

[fredg]

On 27 Apr 2004 00:12:01 GMT, Lumpierbritches wrote:

Private Sub cmdOpenAnimal_C lick()
On Error GoTo Err_cmdOpenAnim al_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmAnimal"

stLinkCriteria = "[AnimalID]=" & "'" & Me![AnimalID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdOpenAni mal_Click:
Exit Sub

Err_cmdOpenAnim al_Click:
MsgBox err.Description
Resume Exit_cmdOpenAni mal_Click

End Sub

Your problem is you have a single quote in the criteria field....

[AnimalID]=BLANK'S MOLLIE-PRINCE BRUISER-3/14/2004-03

So your Where clause is failing when it hits the ' in Blank's.

Try it this way (instead of using & "'" etc.)

stLinkCriteria = "[AnimalID]=" & chr(34) & Me![AnimalID] & chr(34)

--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.