SubFolders Property

Description

Returns a Folders collection consisting of all folders contained in a specified folder, including those with hidden and system file attributes set.

PowerBASIC Syntax

PROPERTY GET SubFolders () AS IFolderCollection

Return Value

IDispatch. Reference to a IFolderCollection interface.

Example [PowerBASIC]

#INCLUDE "windows.inc"

#INCLUDE "scrrun.inc"

DIM fso AS IFileSystem

DIM pFolder AS IFolder

DIM pSubFolders AS IFolderCollection

' Create an instance of the FileSystemObject

fso = NEWCOM "Scripting.FileSystemObject"

' Get a reference to the IFolder interface

pFolder = fso.GetFolder(UCODE$("C:\MyFolder"))

' Get a reference to the subfolders collection

pSubFolders = pFolder.SubFolders

Valid XHTML 1.0 Transitional