AddFolders 方法（Folders）

向 Folders 集合添加新 Folder。

object. Add（folderName）

参数

object

必选项。应为 Folders 集合的名称。

folderName

必选项。要添加的新 Folder 名称。

说明

下面例子举例说明如何利用 Add 方法添加新文件夹：

Sub AddNewFolder（path, folderName）Dim fso, f, fc, nfSet fso = CreateObject（"Scripting.FileSystemObject"）Set f = fso.GetFolder（path）Set fc = f.SubFoldersIf folderName <> "" ThenSet nf = fc.Add（folderName）ElseSet nf = fc.Add（"New Folder"）End IfEnd Sub

如果 folderName 已经存在，则会出现错误。