fso OpenTextFile 方法

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(如不存在),或以写的方式打开(如存在)。
  • 1
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值