D
DS
I'm getting a Syntax Error on this.
Any Suggestions?
Thanks
DS
Dim OUTSQL As String
DoCmd.SetWarnings False
OUTSQL = "UPDATE tblTimeLog SET tblTimeLog.LogTimeOut = #" & TIME & "#, " &
_
"tblTimeLog.LogDateOut = #" & Date & "# " & _
"WHERE tblTimeLog.LogTimeOut = " & Null & " " & _
"AND tblTimeLog.LogDateOut = " & Null & " " & _
"AND tblTimeLog.LogHasChecks = 0;"
DoCmd.RunSQL (OUTSQL)
DoCmd.SetWarnings True
Any Suggestions?
Thanks
DS
Dim OUTSQL As String
DoCmd.SetWarnings False
OUTSQL = "UPDATE tblTimeLog SET tblTimeLog.LogTimeOut = #" & TIME & "#, " &
_
"tblTimeLog.LogDateOut = #" & Date & "# " & _
"WHERE tblTimeLog.LogTimeOut = " & Null & " " & _
"AND tblTimeLog.LogDateOut = " & Null & " " & _
"AND tblTimeLog.LogHasChecks = 0;"
DoCmd.RunSQL (OUTSQL)
DoCmd.SetWarnings True