I want to do database maintenance after midnight. Is there a way to close all harbour applications still running at midnight? What would the source code look like?
Thanks
Fulton Loebel
Close Applcation At Midnight
Re: Close Applcation At Midnight
May you can use TIMER?
-
- Posts: 166
- Joined: Wed Aug 29, 2012 8:25 am
Re: Close Applcation At Midnight
I use :
DEFINE TIMER oOut INTERVAL 59*60000 OF oWnd ;
ACTION iif( LEFT(Time(),2)=="00" , ( set(_SET_ERRORLOG ,"Autoclose.log") , tracelog( DTOC(Date()) + " , Programma closed , user " + UPPER(NetName(.T.)) ) , oWnd:END() ) , )
Frank
DEFINE TIMER oOut INTERVAL 59*60000 OF oWnd ;
ACTION iif( LEFT(Time(),2)=="00" , ( set(_SET_ERRORLOG ,"Autoclose.log") , tracelog( DTOC(Date()) + " , Programma closed , user " + UPPER(NetName(.T.)) ) , oWnd:END() ) , )
Frank
test