ASP SubFolders 集合

SubFolders 集合返回指定的文件夹中所有子文件夹组成的一个集合。

语法

FolderObject.SubFolders

实例

<%

dim fs,fo,x

set fs=Server.CreateObject("Scripting.FileSystemObject")

set fo=fs.GetFolder("c:\test\")


for each x in fo.SubFolders

  'Print the name of all subfolders in the test folder

  Response.write(x.Name & "<br>")

next


set fo=nothing

set fs=nothing

%>


输出：


html

css

asp

vbscript