作用:如果指定的文件夹存在返回 True,不存在返回 False。
18、DriveExists 方法
语法:object.DriveExists(drivespec)
作用:如果指定的驱动器存在,返回 True,如果不存在返回 False。
19、FileExists 方法
语法:object.FileExists(filespec)
作用:如果指定的文件存在,返回 True,若不存在,则返回 False。
20、CreateTextFile 方法
语法:object.CreateTextFile(filename[, overwrite[, unicode]])
overwrite 可选的。Boolean 值,表示一个已存在文件是否可被覆盖。如果可被覆盖其值为 True,其值为 False 时不能覆盖。如果它被省略,则已存在文件不能覆盖。
unicode 可选的。Boolean 值,表示文件是作为一个 Unicode 文件创建的还是作为一个ASCII 文件创建的。如果作为一个 Unicode 文件创建,其值为 True,作为一个 ASCII 文件创建,其值为 False。如果省略的话,则认为是一个 ASCII 文件。
作用:创建一个指定的文件名并且返回一个用于该文件读写的 TextStream 对象。
示例:
Dim f
Set f = fso.CreateTextFile("c:\testfile.txt", True)
21、OpenTextFile 方法
语法:object.OpenTextFile(filename[, iomode[, create[, format]]])
作用:打开一个指定的文件并返回一个 TextStream 对象,该对象可用于对文件进行读、写、追加操作。
说明:
·iomode 参数可为下面设置值中的任何值:
ForReading 1 打开一个只读文件,不能对此文件进行写操作。
ForWriting 2 打开一个用于写操作的文件。如果和此文件同名的文件已存在,则覆盖以前内容。
ForAppending 8 打开一个文件并写到文件的尾部。
注意:在VBA帮助里是没有ForWriting的,其实是有的,VBA帮助也是有错误的。另外,这些常数在使用前要先声明,或者直接用数值。
·create 可选的,它表示如果指定的 filename 不存在是否可以创建一个新文件。如果创建新文件,其值为 True。若不创建文件其值为 False。缺省值为 False。
·Format 参数可为下面设置值中的任何值:
TristateUseDefault –2 使用系统缺省打开文件。
TristateTrue –1 以 Unicode 格式打开文件。
TristateFalse 0 以 ASCII 格式打开文件。
示例:
Dim f
Set f = fso.OpenTextFile("c:\testfile.txt", 2, True)
或者:
Const ForWriting = 2
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
这两者功能是一样的,一个声明了常量,一个直接用数值。都是在C盘创建文件testfile.txt(如不存在),或以写的方式打开(如存在)。
22、CopyFile 方法
语法:object.CopyFile source, destination[, overwrite]
作用:把一个或多个文件从一个地方复制到另一个地方。
说明:需要注意的地方与CopyFolder是完全类似的。
示例:
fso.copyfile "c:\testfile.txt", "f:\abc\" '若abc不存在则出错。
fso.copyfile "c:\testfile.txt", "f:\abc" '若abc不存在则复制testfile.txt到F盘文件名变为abc,若abc存在,出错,因为是一个目录。
23、MoveFile 方法
语法:object.MoveFile source, destination
作用:将一个或多个文件从一个地方移动到另一个地方。
说明:需要注意的地方与MoveFolder是完全类似的。
24、DeleteFile 方法
语法:object.DeleteFile filespec[, force]
作用:删除一个指定的文件。
说明:force 可选的。如果要删除具有只读属性设置的文件,其值为 True。如果其值为 False (缺省),则不能删除具有只读属性设置的文件。