SYntax error

[starclassic]

I'm getting syntac error on this RunSQL

DoCmd.RunSQL "UPDATE tblCollectionsData Set tblCollectionsData.ContactMain = 1 WHERE (tblCollectionsData.PolicyNumber) = " & rst![PolicyNumber]

 

[dhookom]

Is the policy number text or numeric? If it is text, try:

Dim strSQL as String
strSQL = "UPDATE tblCollectionsData " &  _
    "Set ContactMain = 1 " & _
    "WHERE PolicyNumber = """ & rst![PolicyNumber] & """"

DoCmd.RunSQL strSQL

Duane MS Access MVP
[green]Ask a great question, get a great answer.[/green] [red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]

 

[starclassic]

Thanks dhookom,

That work fine. I'm amaze, don't know how you guys know all those double quotations. Always learn something new each day.