Run Code automatically 10 secs after opening Access

[AndrewCorkery]

Hi,

I need to get Access to run some code after opening the Application which will be done by the Windows Scheduled Tasks.

Ideally I would like a MsgBox to pop up after the application has opened, giving the user 10secs to cancel the macros from running- ie when the application is opened by the user and not the windows Scheduled Tasks.

Thanks

Andrew

 

[danvlas]

Create a startup form to be loaded when the application is open (Tools-Startup menu or AutoExec macro).
Timer interval: 1000 (1 second)
Create a text box (SecondsToStart)
Create a command button (butCancel)
Paste the following code into the form's module:

Private Sub butCancel_Click()
DoCmd.Close
End Sub

Sub Form_Timer()
Static CountSeconds As Integer
Me("SecondsToStart&quot = 10 - CountSeconds
If Me("SecondsToStart&quot = 0 Then
Me.TimerInterval = 0
'Call whatever code here, then exit the application
DoCmd.Close ' or DoCmd.Quit
Else
CountSeconds = CountSeconds + 1
End If
End Sub

Good luck

Daniel Vlas
Systems Consultant
danvlas@yahoo.com