Print Page - IFileCollection.Count Property

Title: IFileCollection.Count Property
Post by: José Roca on July 14, 2008, 03:31:50 AM

The following example illustrates use of the Count property.


#INCLUDE "windows.inc"
#INCLUDE "scrrun.inc"

DIM fso AS IFileSystem
DIM pFolder AS IFolder
DIM pFiles AS IFileCollection
DIM nFiles AS LONG

' 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 IFileCollection interface
pFiles = pFolder.Files
' Get the number of files
nFiles = pFiles.Count

PowerBasic Museum 2020-A

Legacy Software (PBWIN 9.0+/PBCC 5.0+) => Windows Script Runtime => Source Code => Scripting => FileSystemObject => Topic started by: José Roca on July 14, 2008, 03:31:50 AM