SubFolders 属性

返回由指定文件夹中所有子文件夹(包括隐藏文件夹和系统文件夹)组成的 Folders 集合。

object.SubFolders

object 应为 Folder 对象的名称。

说明

以下代码举例说明如何使用 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 =sEnd Function

请参阅

Attributes 属性 | DateCreated 属性 | DateLastAccessed 属性 | DateLastModified 属性 | Drive 属性 | Files 属性 | IsRootFolder 属性 | Name 属性 | ParentFolder 属性 | Path 属性 | ShortName 属性 | ShortPath 属性 | Size 属性 | Type 属性

应用于:Folder 对象

返回首页