Scheduling Access Jobs

Jul 01
2010

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

If you need some help on a project drop leave a comment on the post and I will reply.