object.SubFolders
The object is always a Folder object.
The following code illustrates the use of the SubFolders property:
Sub ShowFolderList(folderspec)
Dim fs, f, f1, s, sf
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
Set sf = f.SubFolders
For Each f1 in sf
s = s & f1.name
s = s & vbCrLf
Next
MsgBox s
End Sub
Attributes Property | DateCreated Property | DateLastAccessed Property | DateLastModified Property | Drive Property | Drives Property | Files Property | Folders Collection | IsRootFolder Property | Name Property | ParentFolder Property | Path Property | ShortName Property | ShortPath Property | Size Property | Type PropertyApplies To: Folder Object