GetFolder 方法
返回與指定的路徑中某文件夾相應(yīng)的 Folder 對(duì)象。
object.GetFolder(folderspec)
參數(shù)
object
必選項(xiàng)。應(yīng)為 FileSystemObject 的名稱。
folderspec
必選項(xiàng)。folderspec 是指定文件夾的路徑(絕對(duì)路徑或相對(duì)路徑)。
說(shuō)明
如果指定文件夾不存在,則會(huì)出現(xiàn)錯(cuò)誤。
下面例子舉例說(shuō)明如何使用 GetFolder 方法返回文件夾對(duì)象:
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