VBScript中怎样对文本文件里读写数据

用FileSystemObject对象创建一个TextStream便实现对文本文件的读写
---------------------------------------------------
创建指定文件并返回 TextStream 对象，该对象可用于读或写创建的文件。

语法
object.CreateTextFile(filename[, overwrite[, unicode]])
CreateTextFile 方法的语法有以下部分：

object 必选项。应为 FileSystemObject 或 Folder 对象的名称。
filename 必选项。字符串表达式，指明要创建的文件。
overwrite 可选项。Boolean 值指明是否可以覆盖现有文件。如果可覆盖文件，该值为 True；如果不能覆盖文件，则该值为 False 。如果省略该值，则不能覆盖现有文件。
unicode 可选项。Boolean 值指明是否以 Unicode 或 ASCII 文件格式创建文件。如果以 Unicode 文件格式创建文件，则该值为 True；如果以 ASCII 文件格式创建文件，则该值为 False。如果省略此部分，则假定创建 ASCII 文件。

说明
以下代码举例说明如何使用 CreateTextFile 方法创建并打开文本文件：
Sub CreateAfile
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine("这是一个测试。")
MyFile.Close
End Sub

对于 filename 已经存在的文件，如果 overwrite 参数为 False，或未提供此参数时，则会出现错误。