Patrick

dCreateDate , = Date when the file was added on the file system
dChangeData = data when the file was changed on the file system

dcreatedate normaly will return always the same value

Regards
Luiz
----- Original Message ----- 
From: Patrick Mast, xHarbour.com
To: xHarbour-Developers
Sent: Saturday, August 09, 2008 10:44 AM
Subject: [xHarbour-developers] Bug in FileStats?


Hello,


This is a bug repot from a xHarbour Builder user:


"I try to use filestats and don't understand the return values dCreateDate , 
dChangeData


In next example the creation date from cFileName is compared wih 
Directory(cFileName)[1,3]


FUNCTION MAIN(cFileName)
LOCAL cFileAttr , nFileSize
LOCAL dCreateDate, nCreateTime
LOCAL dChangeDate, nChangeTime
IF cFileName==nil
 cFileName := "d:\libexech\ed.exe"  // also tried with "ed.exe" after
copying it
END
? FileStats( cFileName, @cFileAttr , @nFileSize ,  @dCreateDate,
@nCreateTime,@dChangeDate, @nChangeTime )
? "File statistiscs"
? "File Name :", cFileName
? "Attributes:", cFileAttr
? "File Size :", nFileSize
? "Created :", dCreateDate, TString( nCreateTime )
? "Changed :", dChangeDate, TSTring( nChangeTime )
? Directory(cFileName)[1,3]
WAIT
RETURN


In the test cFileName was nil , so i took first a file copied to the 
directory from the program (ed.exe)


Results : dChangeDate anddCreateDate are both 25/07/2008 (today) 
Directory(cFileName)[1,3] reports corectly 08/13/92 , which is also reported 
from DOS Directory command


When i do not copy ed.exe , and cFileName="d:\libexech\ed.exe" , then


.T.
File statistiscs
File Name : d:\libexech\ed.exe
Attributes: RA
File Size :     139776
Created : 01/18/06 10:01:09
Changed : 07/25/08 14:09:13
08/13/92
Press any key to continue...


What could be 01/18/06 ?
dChangeDate seems always be today , changed or not"


Can someone look at this please? Thanks!


Patrick



-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great 
prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/



_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers 


-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to