VBSチュートリアル:オブジェクト-Foldersコレクション

Folders集合
1つのFolderオブジェクトに含まれるすべてのFolderオブジェクトのセット.
説明
次のコードは、Foldersセットを取得し、For Eachを使用する方法を示しています.Next文は集合メンバーを列挙する:

 Function ShowFolderList(folderspec)     Dim fso, f, f1, fc, s    Set fso = CreateObject("Scripting.FileSystemObject")    Set f = fso.GetFolder(folderspec)    Set fc = f.SubFolders    For Each f1 in fc        s = s & f1.name         s = s & "
"    Next    ShowFolderList = sEnd Function