存取文件的方法有许多种.ppt
《存取文件的方法有许多种.ppt》由会员分享,可在线阅读,更多相关《存取文件的方法有许多种.ppt(15页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、第九章 文件存取文件的方法有许多种,可以使用VB提供函数,使用windows Api函数等,但是最简单的方法是使用filesystemobject对象。而它并非VB内置对象,需引用才可以使用。1filesystemObject对象引用“工程/引用/microsoft scription Runtime”在对象浏览器窗口中选“scripting”模块,看到增了许多对象,drive filesystemobject textstream file等其中filesystemobject是这些对象的关键,想要使用其它对象,都必须先建立filesystemobject对象。文件存取dim fs as n
2、ew filesystemobject 建立filesystemobject对象dim txtf as textstream 定义了一个textstream对象变量textstrem对象与文件的读写所有文件都必须先打开,才能读写,filesystemobjet对象所提供的打开文件的方法有两种:opentextfile打开文件createtextfile建立文件通过filesystemobject所打开的文件是一个TextStream对象,而通过textstream对象的各种方法和属性,就可以进一步读写文件。1)opentextfile 方法:打开文件set textstream对象名=file
3、systemobject名.opentextfile(文件名,IO模式,是否自动建立文件)文件名:建议写入完整路径的文件名。IO模式:可设置成forreading(=1)、forwrting(=2)或forappending(=8)。如果设置成forreading,则打开的文件是只读的;如果设置成forwriting,则打开的文件是可写的,而原来文件 的内容会被清除;如果设置成forappending,则打开的文件是可写的,但原文件 的内容不会被清除,数据会从文件 的最后面开始写入。参数缺省:表示forreading 只读。是否自动建立文件:可设置成true或false。设置为:true 则当
4、文件不存在时,会自动 建立一个新文件。设置为:false 则当文件不存在时,就会产 生错误。缺省时:表示为false。例:将c:autoexec.bat打开成为只读文件 dim fs as new filesystemobject dim txtf as textstream set txtf=fs.opentextfile(“c:autoexec.bat”)例:将c:text.txt打开成“从文件最后面写入的文件”dim fs as new filesystemobject dim txtf as textstream set txtf=fs.opentextfile(“c:test.txt
5、”,forappending,true)txtf.close 2)createtextfile 方法:建立文件set textstream对象名=filesystemobject名.createtextfile(文件名称,是否覆盖原文件)文件名称:建议写入完整路径的文件名。是否覆盖原文件:可设置成true或false。可缺省,缺省时是true,覆盖原文件 如果设置成true,则当文件存在的时候,原文将会被破 坏,而以新文件所替代。如果设置成false,则当文件存在时,将会产生错误例:建立一个c:text.txt,若c:test.txt存在,则覆盖它。dim fs as new filesyst
6、emobject dim txtf as textstream set txtf=fs.createtextfile(“c:text.txt”)3)fileexists 方法:文件是否存在?为了避免破坏已有的文件,通常会将“是否覆盖原文件”参数设置为false。但是有可能产生错误,如何避免错误,可以先判断文件是否存在,此时调用filesystemobjet 对象的fileexists方法,具体程序如下:fs 为filesystemobject if fs.fileexists(“c:test.txt”)then 文件已存在其它处理方式 else set txtf=fs.createtextfi
7、le(“c:text.txt”)end if4)readline 和writeline方法:文件的读取与写入利用createdtextfile和opentextfile所打开(建立)的是文本文件,要存取文本文件,通常采用逐行读取或逐行写入的方式。读取时必须调用textstream对象的readline方法。写入时必须调用writeline方法。例:txtf 和txtf2均为textstream对象s=txtf.readline 读取一行数据,并设置给s变量txtf2.writeline s 将变量s的数据作为文件一行数据写入5)atendofstream 属性:文件是否已到末尾?当读取位置已经
8、到达文件的末尾时,如果再调用readlin读取数据,将会产生错误,为了避免这个错误,必须判断textstream对象的atendofstream属性,如果为true,就表示文件位置已经到达文件末尾,不可以再读数据。If not txtf.atendofstream thens=txtf.readlineendif 例:将c:autoexec.bat文件复制成为c:autoexec.bak文件dim fs as new filesystemobject dim txtf1 as textstreamdim txtf2 as textstreamdim s as stringset txtf1=f
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 存取 文件 方法 许多
限制150内