CopyFolder的使用
方法名：CopyFolder(source,destination,overwrite)
说明：将文件夹从某位置递归复制到另一位置。详细说明请查看表4。
示例：
' 创建FileSystemObject对象
Set objfso = createobject("scripting.FileSystemObject")
' 将D:/test下所有的内容复制到c:/123
objfso.CopyFolder "D:/test","c:/123"
注：如果c:/123不存在，则QTP将自动创建它
CreateFolder及DeleteFolder的使用
方法名：CreateFolder(foldername)/DeleteFolder(folderspec,force)
说明：创建/删除一个路径名为 foldername 的文件夹。详细说明请查看表4。
示例：
' 创建FileSystemObject对象
Set objfso = createobject("scripting.FileSystemObject")
‘ 在c:/创建new folder文件夹，如果文件夹存在，则会出现错误提示
objfso.CreateFolder("c:/new folder")
‘ 删除c:/new folder文件夹
objfso.DeleteFolder("c:/new folder")
注：DeleteFolder无论文件夹是否包含内容，都将删除该文件夹
FolderExists的使用
方法名：FolderExist(folderspec)
说明：如果指定的文件夹存在，则返回 True；否则返回 False。详细说明请查看表4。
示例：
Function hanshu(strpath)
Dim objfso,objset
‘ 创建FileSystemObjec对象
Set objfso = CreateObject("Scripting.FileSystemObject")
‘ 判断在指定的路径中是否有
If Not objfso.FolderExists(strpath) Then
objset = objfso.CreateFolder(strpath)
else
objset = objfso.DeleteFolder(strpath)
End If
hanshu = objset
End Function
hanshu("c:/new folder")
GetAbsolutePathName的使用
方法名：GetAbsolutePathName(pathspec)
说明：从提供的指定路径中返回完整且含义明确的路径。详细说明请查看表4。
示例：
Dim objfso
‘创建FileSystemObject对象
Set objfso = createobject("Scripting.FileSystemObject")
‘返回当前的目录，下面两条语句返回一样的结果
msgbox (objfso.GetAbsolutePathName(""))
msgbox (objfso.GetAbsolutePathName("C:"))
GetFolder的使用
方法名：GetFolder(folderspec)
说明：返回与指定的路径中某文件夹相应的 Folder 对象。可以根据所返回的Folder 对象，再去访问该Folder 对象所持有的属性。
示例：
