db.Execute Error 3061

[JimG]

Hi,



Hoping someone can help an ole mainframer out Trying to get this working in an existing application the users developed. I can't seem to get this command to work. It looks like Access doesn't like the string that I'm feeding the db.execute statement - like its coded incorrectly so access doesn't see it as a valid argument to the command. Help !!!

Here is the code on the delete button:

Dim SiteCdDel As String

SiteCdDel = Me![frmSite]![SiteCode].Value

SQL1 = "Delete * FROM tblSwitch_Mod Where " & _
"(SiteCD = '" & SiteCdDel & "');"

db.Execute SQL1


Here is what it looks like in the debugger
"Delete * FROM tblSwitch_Mod Where (SiteCD = 'APTW');"


Table definition for this column
SiteCD type text


Result

Run Time Error 3061 to few parameters. Expected 1


I've tried re-working the command but no matter what I seem to get that error. Thanks for any advice/help you can provide - I'm stuck !!!

[RuralGuy]

Try brackets:
"([SiteCD] = '" & SiteCdDel & "');"

[JimG]

hmmm.... I tried this and I still got the same error.

how it looked in debugger:

"Delete * FROM tblSwitch_Mod Where ([SiteCD] = 'CVHD');"

[RuralGuy]

That error usually means something is not spelled correctly. I know you have checked that but maybe just one more time.

[JimG]

That Was it ! SiteCD should have been Site_CD. I knew it was going to be something like that. Thanks Again for the help - I'm happy !!!

[RuralGuy]

Excellent! Glad we could help Jim.