Scheduling Access Jobs
I use this code to determine the time set a status label and run some code. These program are opened using a scheduler from splinterware. This action is executed when the form is opened and will automatically close the database when finished. In this sample it runs the reports between 10pm and 11pm.
If Val(Left(Format(Now(), “hh:ss”), 2)) >= 22 And Val(Left(Format(Now(), “hh:ss”), 2)) < 23 Then
Me.txtStatus.Caption = “Running Auto Reports”
Call MakeReports
DoCmd.Quit
End If
testing
Leave a Reply
Want to join the discussion?Feel free to contribute!