GetFolder 方法 |
|
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