That's got it, thanks a lot

"keepitcool" wrote in message
...
Nigel,

in Tools/References set a reference to "Microsoft Scripting Runtime"

Then:

Sub GetFileMod()
Dim oFS As New Scripting.FileSystemObject
Dim oFL As Scripting.File
Set oFL = oFS.GetFile("test1.xls")
MsgBox oFL.DateLastModified

End Sub

keepITcool

< email : keepitcool chello nl (with @ and .)
< homepage: http://members.chello.nl/keepitcool


"Nigel" wrote:

I am trying to extract the DATE part of a file using the
DateLastModified property. Anyone experience of doing this?

It appears I need to define the file as an object first then read the
object property, and finally extract the date string.

TIA
Nigel




----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet
News==---- http://www.newsfeed.com The #1 Newsgroup Service in the
World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers
- Total Privacy via Encryption =---






----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups
---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =---