Como saber a data de criação de um arquivo?

[MGA]

Pessoal, como saber a data de criação de um arquivo?

Não quero a data de alteração e sim criação:


filedate("c:\base\mesas\m000001.txt") <- DATA ALTERAÇÃO

Dtoc(Directory(nomedoexe)[1,F_DATE]) <- DATA ALTERAÇÃO


Obrigado

[Antonio Linares]

The GetFileTime function retrieves the date and time that a file was created, last accessed, and last modified.

BOOL GetFileTime(
HANDLE hFile, // identifies the file
LPFILETIME lpCreationTime, // address of creation time
LPFILETIME lpLastAccessTime, // address of last access time
LPFILETIME lpLastWriteTime // address of last write time
);

http://msdn.microsoft.com/en-us/library/ms724320(VS.85).aspx

[MGA]

Antonio, by Yuri:

cFile = 'c:\Plan001.xls' \\ arquivo
cAtr = '' \\ atributos
nSiz = 0 \\ tamanho
dCreate = ctod('') \\ data criação
nCreate = 0 \\ hora criação em secs
dChange = ctod('') \\ data ult.alteração
nChange = 0 \\ hora ult.alteração em secs


FileStats(cFile,@cAtr,@nSiz,@dCreate,@nCreate,@dChange,@nChange)

Obrigado