G'day,

Is there a way to trigger an MS Access macro based on time, on a daily frequency?

The macro imports a file which is used to update a table.

Using the startup option or an autoexec macro isn't really an option as the database has multiple users who might not close it.

Appreciate any advice.


Thanks,
Dustin

If you have a form that is always being shown in your application, then you could use the Timer event, to check the time and when the time is right, run some code. Or a time elapsed etc.

If you have no form that is always open, how about making one and then making it invisible.

Great idea.
Thanks leehambly.
I'll give that a go.

If you put this code in the front end, and multiple users are running the same front end code, then the event will trigger more than once.

You could write a script that is an old fashioned tsr to run the code from your workstation, or from a server, or you could create a log table that holds a value for a certain time period, and have your cade check that table first before it does anything to make sure you are not running the code as many times as you have users with the app open.

HTH

mmcdonal

Good point mmcdonal. I'll take that into consideration.
Thanks for your help folks. P2P and its members are an invaluable source of information. :)


Cheers,
Dustin

Hi
I us the following code to send an e-mail from my database I thought it might be helpful. The timerinterval is set in the form load. Best of luck
 Me.TimerInterval = 60000


Private Sub Form_Timer()
On Error GoTo ErrorHandler
    Dim dtrunreport As Date
    Dim dtCurTime As Date

    dtrunreport = Format(#9:55:00 AM#, "hh:mm")
    dtCurTime = Format(Time(), "hh:mm")

    If dtCurTime = dtrunreport Then
       DoCmd.SendObject acSendReport, "No Assignment Report", acFormatHTML, "[email protected]", "", "", "NO Assignment Report", "Suppliers with NO ASSIGNMENT", True
ErrorHandlerExit:

   Exit Sub

ErrorHandler:
   MsgBox "Error No: " & Err.Number & "; Description: " & Err.Description
   Resume ErrorHandlerExit

    End If

End Sub

Brendan Bartley

That actually helps with a question my friend was asking. I'll direct him to this bit of code.
Thanks mate. :)

...Dustin