FileExists
描述：判断指定文件是否存在
语法：object. FileExists (strFile)
参数：strFile为指定的文件
示例：检查文件： c:test.txt是否存在
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用FileExists判断指定文件是否存在 MsgBox Fso.FileExists("c:test.txt") |
FolderExist
描述：判断指定文件夹是否存在
语法：object. FolderExists (strFolder)
参数：strFolder为指定的文件夹
示例：检查文件夹： c:test是否存在
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用FolderExists判断指定文件夹是否存在 MsgBox Fso.FolderExists("c:test") |
CopyFile
描述：将一个或多个文件从某位置复制到另一位置
语法：object.CopyFile "source", "destination"[, overwrite]
参数：source必选项。表示指定文件的路径。组成部分中可用通配符。
destination必选项。表示目标位置路径
overwrite可选项。Boolean 值表明是否覆盖现有文件。如果是 True，则覆盖文件；如果是 False，则不覆盖现有文件。默认值是 True
示例：将 c:test.txt文件复制到D:下
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用CopyFile复制文件到另一个位置,False不覆盖已存在文件 Fso.CopyFile "c:test.txt","D:",False 'True覆盖已存在文件 Fso.CopyFile "c:test.txt","D:",True |
示例：将 c:下所有的txt文件复制到D:下
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用*.txt,可以同时将多个文件复制到另一个位置,False不覆盖已存在文件 Fso.CopyFile "c:*.txt","D:",False 'True表示覆盖已存在文件 Fso.CopyFile "c:*.txt","D:",True |
CopyFolder
描述：将文件夹从某位置复制到另一位置
语法：object. CopyFolder "source", "destination"[, overwrite]
参数：source必选项。表示指定文件夹的路径。组成部分中可用通配符。
destination必选项。表示目标位置的路径
overwrite可选项。Boolean 值表明是否覆盖现有文件夹。
如果是 True，则覆盖文件夹；如果是 False，则不覆盖现有文件夹。默认值是 True
示例：将 c:test文件夹复制到D:下
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用CopyFile复制文件到另一个位置,默认为True覆盖已存在文件 Fso.CopyFolder "c:test","D:" 'False不覆盖已存在文件 Fso.CopyFolder "c:test","D:",False |
MoveFile
描述：将一个或多个文件从某位置移动到另一位置
语法：object.MoveFile source, destination
