SubFolders
Type	Read-Only Property
Return Value Type	Collection
Description	Returns the subfolders contained in the specified folder.
Example	Code: directoryname="c:\test\" Set fso = CreateObject("Scripting.FileSystemObject") set mainfolder=fso.GetFolder(directoryname) Set foldercollection = mainfolder.SubFolders For Each folder In foldercollection       Response.Write folder.Name Next Result: testagain