GetFolder 方法

返回与指定的路径中某文件夹相应的 Folder 对象。

object.GetFolder(folderspec)

参数

object

必选项。应为 FileSystemObject 的名称。

folderspec

必选项。folderspec 是指定文件夹的路径（绝对路径或相对路径）。

说明

如果指定文件夹不存在，则会出现错误。

下面例子举例说明如何使用 GetFolder 方法返回文件夹对象：

Sub AddNewFolder(path, folderName)  Dim fso, f, fc, nf  Set fso = CreateObject("Scripting.FileSystemObject")  Set f = fso.GetFolder(path)  Set fc = f.SubFolders  If folderName <> "" Then    Set nf = fc.Add(folderName)  Else    Set nf = fc.Add("New Folder")  End IfEnd Sub

文章评论

共有 位脚本之家网友发表了评论我来说两句