Close a database at a certain time

Question

I would like to force a front end to shut down at 11:50pm every night so that our automated compacting can run on the back end at 11:59pm.

Thanks in advance.

Answer 1

Is a timer interval of 3,600,000 the equivalent of one hour?

Answer 2

I would say check it every 15 minutes. And I probably would extend the time.

Answer 3

I think I need some additional help.

I rewrote your code like this:

Private Sub Form_Timer()

'this form is my switchboard which is always open

If (Time() > #3:30:00 AM#) And (Time() < #4:00:00 AM#) Then

    DoCmd.OpenForm "MaintenanceWarning"

    Pause (3)

    Application.Quit

End If

End Sub

I am telling network administrators to set the compact to run at around 3:45ish.

Question: How often do I need to set the timer interval?  My head has officially exploded trying to calculate this :-0

And I don't want to unnecessarily tax the system by checking too frequently.  And do I need to set a larger time span, like 4:30am instead of 4:00am to accommodate this?

Thanks in advance (and probably after, as well!)

Answer 4

I do this with one of my apps:

Private Sub Form_Timer()

If (Time() >= #7:00:00 PM#) Then

    DoCmd.OpenForm "frmTimeClose"

End If

End Sub

This checks to see if the time is after 7PM. The time interval can be set to check however frequently you want where 1 sec = 1000. It then opens frmtimeClose which displays a message that the app will close down, then 1 minute later it closes.