Returns the folder object for the parent of the specified file or folder. Read-only.
Syntax
object.ParentFolder
The object is always a File or Folder object.
Examples
The following code illustrates the use of the ParentFolder property with a file.
Function ShowFileAccessInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
s = UCase(f.Name) & " in " & UCase(f.ParentFolder) & vbCrLf
s = s & "Created: " & f.DateCreated & vbCrLf
s = s & "Last Accessed: " & f.DateLastAccessed & vbCrLf
s = s & "Last Modified: " & f.DateLastModified
Debug.Print s
End Function
Run this code in Immediate Window:
Debug.Print ShowFileAccessInfo("D:\helloworld.txt")
Result:
D:\HELLOWORLD.TXT
Created: 2022/4/14 9:36:47
Last Accessed: 2022/4/14 9:36:47
Last Modified: 2022/4/14 14:16:17