DateLastModified property date extraction
 

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 =---

DateLastModified property date extraction
 

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 =---

DateLastModified property date extraction
 

Nigel,

If you don't have a reference to the Scripting Runtime Library, go to the
Tools menu, choose References, find "Scripting Runtime Library" and check
it. Then, use code like


Dim FSO As Scripting.FileSystemObject
Dim F As Scripting.File
Set FSO = New Scripting.FileSystemObject
Set F = FSO.GetFile(ThisWorkbook.FullName)
Debug.Print Int(F.DateLastModified)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Nigel" wrote in message
...
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
=---

DateLastModified property date extraction
 

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 =---

DateLastModified property date extraction
 

Chip,

Thanks for your help again, to illuminate my understanding further, I found
the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2), however
will this code run in NT4 / Excel 97 which is my target system ?

TIA
Nigel


"Chip Pearson" wrote in message
...
Nigel,

If you don't have a reference to the Scripting Runtime Library, go to the
Tools menu, choose References, find "Scripting Runtime Library" and check
it. Then, use code like


Dim FSO As Scripting.FileSystemObject
Dim F As Scripting.File
Set FSO = New Scripting.FileSystemObject
Set F = FSO.GetFile(ThisWorkbook.FullName)
Debug.Print Int(F.DateLastModified)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Nigel" wrote in message
...
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 =---

DateLastModified property date extraction
 

Nigel,

I believe that the Scripting Runtime Library is installed by Internet
Explorer version 5, so if you have IE5 or later on the system, it should
work fine.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

"Nigel" wrote in message
...
Chip,

Thanks for your help again, to illuminate my understanding further, I
found
the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2),
however
will this code run in NT4 / Excel 97 which is my target system ?

TIA
Nigel


"Chip Pearson" wrote in message
...
Nigel,

If you don't have a reference to the Scripting Runtime Library, go to
the
Tools menu, choose References, find "Scripting Runtime Library" and
check
it. Then, use code like


Dim FSO As Scripting.FileSystemObject
Dim F As Scripting.File
Set FSO = New Scripting.FileSystemObject
Set F = FSO.GetFile(ThisWorkbook.FullName)
Debug.Print Int(F.DateLastModified)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Nigel" wrote in message
...
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
=---

DateLastModified property date extraction
 

These show the API approach:

http://support.microsoft.com/default...76&Product=vb6
HOWTO: Search Directories to Find or List Files

http://support.microsoft.com/default...21&Product=vb6
HOWTO: Get Extended File Time Information Using the Win32 API

--
Regards,
Tom Ogilvy

Nigel wrote in message
...
Chip,

Thanks for your help again, to illuminate my understanding further, I
found
the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2),
however
will this code run in NT4 / Excel 97 which is my target system ?

TIA
Nigel


"Chip Pearson" wrote in message
...
Nigel,

If you don't have a reference to the Scripting Runtime Library, go to
the
Tools menu, choose References, find "Scripting Runtime Library" and
check
it. Then, use code like


Dim FSO As Scripting.FileSystemObject
Dim F As Scripting.File
Set FSO = New Scripting.FileSystemObject
Set F = FSO.GetFile(ThisWorkbook.FullName)
Debug.Print Int(F.DateLastModified)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Nigel" wrote in message
...
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
=---