Count Property

 

Description

 

Returns the number of folders in the collection.

 

PowerBASIC Syntax

 

PROPERTY GET Count () AS LONG

 

Return Value

 

LONG. The number of folders in the collection.

 

Example [PowerBASIC]

 

#INCLUDE "windows.inc"

#INCLUDE "scrrun.inc"

 

DIM fso AS IFileSystem

DIM pFolder AS IFolder

DIM pSubFolders AS IFolderCollection

DIM nSubFolders AS LONG

 

' Create an instance of the FileSystemObject

fso = NEWCOM "Scripting.FileSystemObject"

' Get a reference to the IFolder collection

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

' Get a reference to the IFolderCollection interface

pSubFolders = pFolder.SubFolders

' Get the number of subfolders

nSubFolders = pSubFolders.Count

 

Valid XHTML 1.0 Transitional