GetFolder 方法

描述
返回与指定的路径中某文件夹相应的 Folder 对象。
语法
object.GetFolder(folderspec)

GetFolder 方法的语法有以下部分:

部分 描述
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 If
End Sub



本文档由兄弟工作组制作完成,部分内容摘自因特网公开的文档资料,欢迎您和我们一起完善此文档。兄弟工作组网站: www.vrbrothers.com