Hi,

   I am trying to access the creationdate property of a folder. Currently I have a script that reports all users who have logged into a machine like this...

Set FSO = CreateObject("Scripting.FileSystemObject")
ShowSubFolders FSO.GetFolder("C:\Documents and Settings\")
Sub ShowSubFolders(Folder)
    For Each SubFolder In Folder.SubFolders
        strDocArray = SubFolder.Path
        NewArray = Split(strDocArray, "\")
        strLogin = NewArray(2)
        objRecordset.AddNew
        objRecordset("Key") = xxx
        objRecordset("ComputerName") = strComputerName
        objRecordset("Login") = strLogin
        objRecordset("Date") = xxx
        objRecordset("Time") = xxx
        objRecordset.Update
    Next
End Sub

   This accesses all the folders in the documents and settings folder structure and passes the user names from those folders.

   I want to get the creationdate of those same folders. Do I do something like:

   strCreateDate = SubFolder.CreationDate

I have another script that gets the path and screation date, but it does every folder on the computer. That is too much of course.

Thanks,


mmcdonal

__________________
mmcdonal

Look it up at: http://wrox.books24x7.com

In case anyone is reading this thread, I found the answer. It is not CreationDate as in VB, but...

strDate = SubFolder.DateCreated

mmcdonal

Here you go - DateCreated Property

There are other properties listed on the left, that should be useful to you.

Cheers!

_________________________
- Vijay G
Strive for Perfection

Refinement:
As an example, this property returns:
"2/13/2004 1:52:39 PM"

To make sure I get just the date, I used this code:

DateArray = Split(SubFolder.DateCreated, " ")
strCreate = DateArray(0)

This method uses the " " space to create array elements, and then I just take the first element (0) as my value. I pass this to the database.

mmcdonal

So you don't need the time part there? Just the date on which it was created would do? Then fine that was right.

Cheers!

_________________________
- Vijay G
Strive for Perfection