goApp = NEWOBJECT('custom') && instanciate your goApp object here goApp.AddProperty('oAppTimer') goApp.oAppTimer = NEWOBJECT('_AppTimer', 'AppTimer.prg') goApp.oAppTimer.Release()**** Code for the AppTimer.PRG file ****
DEFINE CLASS _AppTimer AS Timer PROCEDURE Init THIS.Interval=300000 && this is equal to 5 minutes THIS.Enabled=.t. ENDPROC PROCEDURE Release RELEASE THIS ENDPROC PROCEDURE Timer WAIT WINDOW 'Fired...' TIMEOUT 1 *!* put your file check code here and remove wait window ENDPROC ENDDEFINE