Property: SubFolders for Folder

Download PDF

Updated2024-09-12
1 minute(s) read

DIAdem 2021 Education
DIAdem 2021 Professional
DIAdem 2021 Advanced
+ 3

Returns the folders collection for a Folder object. You can use this to access the subfolders in a folder.

Set oFolders = Object.SubFolders

Object	Folder Object with this property
oFolders	Folders Returned object

The following example returns the number of folders:

Copy script

Function CountFolders(sFolderSpec)
  Dim fso, oMyFolder, oMySubFolder, oMySubFolders
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set oMyFolder = fso.GetFolder(sFolderSpec)
  Set oMySubFolders = oMyFolder.SubFolders
  CountFolders = "Number of folders: " & oMySubFolders.Count
End Function

DIAdem Help

Table of Contents

Property: SubFolders for Folder

See Also

Log in to get a better experience