351.txt

Java Script & VB Script 教程

OpenTextFile 方法 
 
Microsoft® Visual Basic® Scripting Edition
OpenTextFile 方法
语言参考 
版本 2 
请参阅
 应用于
描述
打开指定的文件并返回一个 TextStream 对象，可以读取此对象或将其追加到文件。
语法
	object.OpenTextFile(filename[, iomode[, create[, format]]])
OpenTextFile 方法的语法有以下部分：
	部分
		描述
	object
		必选。应为 FileSystemObject 对象的名称。
	filename
		必选。字符串表达式，指明要打开的文件名称。
	iomode
		可选。输入/输出模式，是下列两个常数之一：ForReading 或 ForAppending。
	create
		可选。Boolean 值，指出当指定的 filename 不存在时是否能够创建新文件。允许创建新文件时为 True，否则为 False。默认值为 False。
	format
		可选。三个 Tristate 值之一，指出以何种格式打开文件。若忽略此参数，则文件以 ASCII 格式打开。
设置
iomode 参数可为下列设置之一：
	常数
		值
			描述
	ForReading
		1
			以只读模式打开文件。不能对此文件进行写操作。
	ForAppending
		8
			打开文件并在文件末尾进行写操作。
format 参数可为下列设置之一：
	常数
		值
			描述
	TristateUseDefault
		-2
			以系统默认格式打开文件。
	TristateTrue
		-1
			以 Unicode 格式打开文件。
	TristateFalse
		0
			以 ASCII 格式打开文件。
说明
以下代码举例说明如何使用 OpenTextFile 方法在文件末尾添加文本：
Sub OpenTextFileTest
  Const ForReading = 1, ForWriting = 2, ForAppending = 3
  Dim fs, f
  Set fs = CreateObject("Scripting.FileSystemObject")
  Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,TristateFalse)
  f.Write "嗨，你好！"
  f.Close
End Sub