This part of code executes after the user logs in in the system in Access.
-
Option Compare Database
-
Option Explicit
-
-
Function updateShftDate()
-
-
On Error GoTo Macro6_Err
-
DoCmd.SetWarnings False
-
DoCmd.OpenQuery "qryShiftDate", acViewNormal, acEdit
-
-
Macro6_Exit:
-
Exit Function
-
-
Macro6_Err:
-
MsgBox Error$
-
Resume Macro6_Exit
-
DoCmd.SetWarnings False
-
-
End Function
-
I've also tried replacing the
with
but is not working either. When I tried to set the
to TRUE, it pops-up the Warning message saying
- You are about to run an update query that will modify your data in your table
This does not work when called in Access VBA. But this runs when the query is manually ran.
