Getting a File Date & Time stamp

[Guest]

Hi
Is it possible to get a file date & time stamp info (any particular file
stored on harddrive) from within VBA. How??

Thats a lot for your help

James

 

[Guest]

Hi:
From the vba online help:
'------------------------------
Sub ShowFileInfo()
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile("E:\Computer\Archive\Graphics\VCRPause.bmp")
s = f.DateCreated
MsgBox s
End Sub
'-------------------------------

See online-help for the File Object.
Regards,
Sebastienm

 

[Guest]

Try:

Function TS()
Set fso = CreateObject("Scripting.FileSystemObject")
TS = fso.GetFile("c:\aa.txt").datecreated
Set fso = Nothing
End Function

NB: Modify the function so that the fully qualified name of your file is
passed in as an argument.

 

[Tom Ogilvy]

VBA's function:

FileDateTime(pathname)

 

[Guest]

Tom,

Is there a similar function to retrieve the date and time a file was last
modified and by whom?

Thanks

 

[Tom Ogilvy]

If you mean any file:

See Ivan Moala's page
http://www.xcelfiles.com/Shell32_01.html
http://www.xcelfiles.com/Shell32_02.html