Tested with xBuildW beta 8.3 on Windows XP Pro SP3:

function main()
   local cFile:="test.txt"
   local dDate:=date(), cTime:=time()
   set century on
   ? filedate( cFile )
   setfdati( cFile, dDate, cTime)
   ? filedate( cFile )   // here shows  12/07/1617
   setfdati( cFile, date(), cTime )
   ? filedate( cFile )   // here shows  08/25/2009
   wait "..."
return nil


Ella
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day 
trial. Simplify your report design, integration and deployment - and focus on 
what you do best, core application coding. Discover what's new with 
Crystal Reports now.  http://p.sf.net/sfu/bobj-july
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to