DIAdem Help

Property: Count for Folders

Download PDF

Updated2024-09-12
1 minute(s) read

DIAdem 2021 Education
DIAdem 2021 Professional
DIAdem 2021 Advanced
+ 3

Returns the number of folders.

Object.Count

Object	Folders Object with this property
Object.Count	LongInteger with read access

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: Count for Folders

See Also

Log in to get a better experience