RunSQL to clear one collumn of daata 2

[RonMcIntire]

I have tried my level best but nothing seems to work. Can anyone help?

Here is my code:

Sub cmdResetRecSent_Click()

Dim strSQL As String

strSQL = "UPDATE [tblHOA MEMBERs] SET [tblHOA MEMBERs].RecSent WHERE ((([tblHOA MEMBERs].Member) = -1))"

DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
DoCmd.SetWarnings True

End Sub

Thanks
Ron Mc

 

[dhookom]

You don't have any value you are setting RecSent to. I would expect you need something like the following:

Sub cmdResetRecSent_Click()

  Dim strSQL As String

  strSQL = "UPDATE [tblHOA MEMBERs] SET [tblHOA MEMBERs].RecSent[highlight #FCE94F] = -1[/highlight]  WHERE Member = -1"

  DoCmd.SetWarnings False
  DoCmd.RunSQL strSQL
  DoCmd.SetWarnings True

End Sub

Duane
Minnesota
Hook'D on Access
MS Access MVP 2001-2016

 

[RonMcIntire]

dhookom:

Thanks. Surprising that one error like this can slip through. Actually, this should be null.
Works fine now.
Ron

 

[Andrzejek]

Ron,

Don't you think Duane deserves a star for his quick and helpful post?


---- Andy

There is a great need for a sarcasm font.

 

[RonMcIntire]

Sure do! Here's my Star Duane. Ron

 

[Andrzejek]

Wrong post for the star - I didn't do anything.
Duane helped you, on New Year's Eve!!!


---- Andy

There is a great need for a sarcasm font.