Page 1 of 1

Chage Date/Time in a File

Posted: Wed Dec 21, 2005 2:22 pm
by Rafael Clemente
Is there a function which permits to retrieve/exchange Date and Time of last modif. in any file. Somethig similar to the FWH SetFDate()/GetFTime() functions?
Thanks
Rafael

Posted: Thu Dec 22, 2005 6:36 am
by Antonio Linares
Rafael,

You can use Directory() to retrieve the date and time. Here you have a working sample:

Code: Select all

#include "FWCE.ch"

function Main()

   local oWnd
   
   DEFINE WINDOW oWnd TITLE "DateTime"
   
   @ 9, 2 BUTTON "Date-Time" ;
      SIZE 210, 30 ACTION ShowDateTime()

   ACTIVATE WINDOW oWnd
   
return nil   

function ShowDateTime()

   local aInfo := Directory( CurDir() + "\datetime.exe" )

   if Len( aInfo ) > 0
      MsgInfo( DToC( aInfo[ 1 ][ 3 ] ) )
      MsgInfo( aInfo[ 1 ][ 4 ] )
   endif      
   
return nil

Posted: Thu Dec 22, 2005 7:11 am
by Antonio Linares
To change the date and time we need to use Windows API SetFileTime().

We are going to build a sample of its use.

Posted: Thu Dec 22, 2005 8:39 am
by Rafael Clemente
Antonio.
Thanks. I'll apreciate that. I need a certain control over the dates and times of the DBFs so that I can control their syncronization through ActiveSync
Regards
Rafael