使用 VBScript 对目录进行分类355

在 VBScript 中，可以使用 FileSystemObject (FSO) 对象访问和管理文件系统。FSO 提供了多种方法来分类目录，包括根据文件名、目录名、日期或其他属性进行筛选。

使用 ForEach 循环遍历目录

要遍历目录中的所有文件和子目录，可以使用 ForEach 循环。这会遍历目录中的每个项目，无论其是文件还是子目录。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
For Each item In

Next
```

使用子文件夹获取子目录

要获取目录中的所有子目录，可以使用 SubFolders 集合。这会返回一个包含目录中所有子目录的 Folder 对象集合。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
For Each subFolder In

Next
```

使用 Filter 方法筛选目录和文件

Filter 方法允许您根据指定条件筛选目录和文件。您可以使用各种属性作为筛选参数，例如文件名、目录名、日期和大小。

根据文件名筛选目录和文件

要根据文件名筛选目录和文件，请使用 FileName 属性。这会返回一个包含与指定文件模式匹配的文件和子目录的 Folder 对象集合。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
Set filteredItems = ("*.txt")
For Each item In filteredItems

Next
```

根据目录名筛选目录

要根据目录名筛选目录，请使用 Name 属性。这会返回一个包含与指定目录模式匹配的子目录的 Folder 对象集合。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
Set filteredItems = ("MySubFolder")
For Each item In filteredItems

Next
```

根据日期筛选目录和文件

要根据日期筛选目录和文件，请使用 DateLastModified 属性。这会返回一个包含在指定日期范围内修改的文件和子目录的 Folder 对象集合。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
Set filteredItems = ( _
"DateLastModified >= #2022-01-01# And _
DateLastModified < #2022-12-31#")
For Each item In filteredItems

Next
```

根据大小筛选目录和文件

要根据大小筛选目录和文件，请使用 Size 属性。这会返回一个包含大小在指定范围内的文件和子目录的 Folder 对象集合。```vbscript
Set fso = CreateObject("")
Set rootFolder = ("C:MyDirectory")
Set filteredItems = ( _
"Size >= 102400 And Size < 1048576")
For Each item In filteredItems

Next
```

2025-01-16

上一篇：VBScript：轻松弹出文件打开对话框

下一篇：VBScript入门指南：让小学生轻松开始编程之旅