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