Kamis, 18 Juli 2013

[MS_AccessPros] DB.execute Update Syntax Help

 

Friends.

I can't seem to get the syntax right to update a yes/no field in a table. I want to update all fields that are false to true. Here is my code:
'Flag units sent up to True
Dim db As Database
Set db = CurrentDb
Dim strSQL As String
Dim strSQL1 As String

strSQL = "UPDATE TEARDOWN-PRIMARY SET TEARDOWN-PRIMARY.[Posted] = True " & _
"WHERE ((TEARDOWN-PRIMARY.[Posted] = " & False & "));"
Debug.Print strSQL
strSQL1 = "UPDATE CitySemiTEARDOWN-PRIMARY SET CitySemiTEARDOWN-PRIMARY.[Posted] = True " & _
"WHERE ((CitySemiTEARDOWN-PRIMARY.[Posted] = " & False & "));"
Debug.Print strSQL1
db.Execute strSQL, dbFailOnError
db.Execute strSQL1, dbFailOnError

MsgBox CStr(db.RecordsAffected) & " records updated.", vbInformation, "Records Updated"
Set db = Nothing

It errors on the first strSQL statement.

Doyce

__._,_.___
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)
Recent Activity:
.

__,_._,___

Tidak ada komentar:

Posting Komentar