Form_Timer Code (1 Viewer)

L4serK!LL

Registered User.
Local time
Today, 10:00
Joined
Jul 22, 2002
Messages
59
Code:
Private Sub Form_Timer()
    If (Me.kalender <> Date) Then
        Me.kalender.Locked = False
        Me.kalender = Date
        Me.kalender.Locked = True
        MsgBox "Datum gereset"
    End If
    ' do backup
    Kill "Tikking.txt"
    DoCmd.TransferText acExportDelim, , "Tikking", "Tikking.txt"
End Sub
... with timerinterval set to 3600000.

Apparently however the date on the ActiveX-calender doesn't change after midnight on the different machines where the form is open... Is there something I should keep in mind when implementing this? :confused:
 

Users who are viewing this thread

Top Bottom