File Data (v2000)

Topic

New Reply

How can I pull the ‘Date Modified’ date on a specific file? For instance, C:Test.xls was modified on 12/17/2004…how can I retrieve that date?
Thanks!
Dashiell

Reply | Quote

Replies

You can use code like this:

Debug.Print CreateObject(“Scripting.FileSystemObject”).GetFile(“C:Test.xls”).DateLastModified

This doesn’t require you to set a reference. If you want more control, set a reference (in Tools | References) to Microsoft Scripting Runtime, and use code like this:

Dim fso As New Scripting.FileSystemObject
Dim fil As Scripting.File
Set fil = fso.GetFile(“C:Text.xls”)
Debug.Print fil.DateLastModified
Set fil = Nothing
Set fso = Nothing

Reply | Quote

Perfect. Thanks!!

Reply | Quote

Perfect. Thanks!!

Reply | Quote

Does that also include the time component?

If not, how do you get the time component?

Reply | Quote

Have you tried it? Yes, DateLastModified includes a data AND a time component.

Reply | Quote

You can use code like this:

Debug.Print CreateObject(“Scripting.FileSystemObject”).GetFile(“C:Test.xls”).DateLastModified

This doesn’t require you to set a reference. If you want more control, set a reference (in Tools | References) to Microsoft Scripting Runtime, and use code like this:

Dim fso As New Scripting.FileSystemObject
Dim fil As Scripting.File
Set fil = fso.GetFile(“C:Text.xls”)
Debug.Print fil.DateLastModified
Set fil = Nothing
Set fso = Nothing

Reply | Quote