Use VBA to retrieve a file's date? 1

[dmon000]

How would one retrieve a file's date using VBA? For example, if the file name was N:\download\flatfile.txt

Thanks!!

 

[PHV]

A starting point:
MsgBox FileDateTime("N:\download\flatfile.txt")

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[fneily]

Here's another way. No harm in seeing more then one way. The following loops through a directory, but you can modify it to just do one file.
I created a listbox on a form, setting Row Source Type to Value List.
I then created a command button with the following code on OnClick event:

Private Sub Command2_Click()
Dim strFill As String
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\excelforcourse")
For Each strFileName In objFolder.Items
strFill = strFill & strFileName & " " & objFolder.GetDetailsOf(strFileName, 3) & ";"
Next
ListProps.RowSource = strFill
End Sub

strFill statement is on one line.
You'll notice the 3 in the GetDetailsOF - that the Date Modified index. There's 34 properties of a file you can retrieve this way.