当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:方法-GetFolder 方法

VBScript
VBS教程:属性-DateCreated 属性
VBS教程:属性-Count 属性
VBS教程:属性-CompareMode 属性
VBS教程:属性-Column 属性
VBS教程:属性-AvailableSpace 属性
VBS教程:属性-Attributes 属性
VBS教程:属性-AtEndOfStream 属性
VBS教程:属性-AtEndOfLine 属性
VBS教程:对象-Folders 集合
VBS教程:对象-Folder 对象
VBS教程:对象-FileSystemObject 对象
VBS教程:对象-Files 集合
VBS教程:对象-File 对象
VBS教程:对象-Drives 集合
VBS教程:对象-Drive 对象
VBS教程:对象-Dictionary
VBS教程:方法-WriteLine 方法
VBS教程:方法-WriteBlankLines 方法
VBS教程:方法-Write 方法
VBS教程:方法-SkipLine 方法

VBScript 中的 VBS教程:方法-GetFolder 方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 104 ::
收藏到网摘: n/a

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