Microsoft® Visual Basic® Scripting Edition SubFolders, propriété |
Référence de la bibliothèque d'exécution Scripting Version 3 |
Description
Renvoie une collection Folders comprenant tous les dossiers contenus dans le dossier spécifié, y compris ceux qui sont cachés ou système.
Syntaxe
object.SubFoldersL'argument object représente toujours un objet Folder.
Notes
Le code suivant illustre l'emploi de la propriété SubFolders :Function ShowFolderList(folderspec) Dim fso, f, f1, s, sf Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec) Set sf = f.SubFolders For Each f1 in sf s = s & f1.name s = s & "<BR>" Next ShowFolderList = s End Function