|
楼主 |
发表于 2014-5-31 17:54
|
显示全部楼层
16、DeleteFolder 方法
语法:object.DeleteFolder folderspec[, force]
folderspec 必需的。要删除的文件夹的名字。 Folderspec 可以在最后的路径部件中包含通配符。
force 可选的。Boolean 值,如果要删除具有只读属性设置的文件夹,其值为 True,如果值为 False (缺省),则不能删除具有只读属性设置的文件夹。
作用:删除一个指定的文件夹和它的内容。
说明:如果没有发现相匹配的文件夹,则发生一个错误。DeleteFolder 方法停止在它遇到的第一个错误上,不要尝试回卷或撤消错误发生前所做的任何改变。
示例:
fso.DeleteFolder("c:\tmp")
17、FolderExists 方法
语法:object.FolderExists(folderspec)
作用:如果指定的文件夹存在返回 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 (缺省),则不能删除具有只读属性设置的文件。
(三)处理驱动器
可以利用Drive对象来获取有关各种驱动器的信息,Drive对象的属性有:
TotalSize 属性 驱动器的总容量,以字节为单位。
AvailableSpace 属性 驱动器的可用空间容量,以字节为单位。
FreeSpace 属性 驱动器的剩余空间容量,和 AvailableSpace 属性是相同的。
对于支持限额的计算机系统来说,二者之间可能有所不同。
DriveLetter 属性 驱动器字母,即盘符。
DriveType 属性 驱动器的类型。如"Removable"、"Fixed"、"Network"、"CD-ROM"、"RAM Disk"
SerialNumber 属性 驱动器的序列号。
FileSystem 属性 驱动器所使用的文件系统类型。如FAT、FAT32、NTFS、以及 CDFS。
IsReady 属性 驱动器是否可用。
ShareName 属性 驱动器的网络共享名。
VolumeName 属性 驱动器的卷标名。
Path 属性 驱动器的路径。C 驱动器的路径是 C:,而不是 C:\。
RootFolder 属性 定驱动器的根文件夹。C 驱动器的根文件夹是 C:\。
FILESYSTEMOBJECT简称FSO,是SCRIPTING类库对象(SCRIPTING.FILSYSTEMOBJECT)
同类库的还有字典对象(Dictionary),代码加密算法的ENCODER对象(这个很冷门,因为算法是公开化的,容易破解)
————————————
SCRIPTING在MICROSOFT的中译叫脚本运行时,呃,有点怪异,但它反正不是VBA的默认类库,也不是OFFICE的类库,所以你在EXCEL VBA找不到它的帮助很正常。
EXCELHOME对FSO和Dictionary的类实例讨论比较多,但帮助文件方面没有资源么?
FSO最早在VS98就出现了,随VB98、VC98的MSDN库开始就有它的帮助文件,如果你装了.NET的MSDN也一样可以找到。
问题是MSDN很大,你不做开发就要找。
还有一个专门针对SCRIPTING的是VBS的帮助文件,WSH(Windows Script HOST 5.X 以上),包含了上述模型的介绍,其中还有VBS类库的正则表达式类的帮助。
不能上传过大的附件,随便找个IASK的点,不保证效果(建议你以后查MICROSOFT的)
http://ishare.iask.sina.com.cn/f/12480356.html?retcode=0
MICROSOFT官方目前的下载链
http://www.microsoft.com/downloads/zh-cn/details.aspx?FamilyID=376d98b6-67cf-4473-9b7d-f635292a286f
其中那个SCD56CHS.EXE就是,你执行一下,它会给你解开一个标准的CHM文档.注意文档解开的位置.
如果你下了这个,就不用我前面找的那个链接了,以官方的文档,或MSDN为准。
学习或参考FSO或其它SCRIPTING等类库方法、属性,直接查找“脚本运行时”中的对应类模型,有详细的例子介绍。
|
|