VBS教程：fso方法-CreateTextFile 方法

简介

CreateTextFile 方法是 FileSystemObject 对象的一个方法，用于创建新文件并返回一个 TextStream 对象，该对象可用于向文件中写入数据。这个方法十分常见，使用频率高，应该是初学者必学的 VBS 语言的方法之一。

语法

CreateTextFile 方法的语法如下：

object.CreateTextFile(filename[, overwrite[, unicode]])

参数说明：

• filename：要创建的文件名，包含完整的路径信息。
• overwrite：可选参数，如果该参数为 True 则表示允许覆盖同名文件，否则不允许。
• unicode：可选参数，如果该参数为 True 则表示创建 Unicode 文件，否则为 ASCII 文件。

示例

示例一

下面是一个例子，演示如何使用 CreateTextFile 方法创建一个 ASCII 格式的文本文件：

Set fso = CreateObject("Scripting.FileSystemObject")Set file = fso.CreateTextFile("C:\test.txt", True, False)file.WriteLine("This is the first line.")file.WriteLine("This is the second line.")file.WriteLine("This is the third line.")file.Close

在上面的例子中，我们创建了一个 FileSystemObject 对象和一个新的文本文件（test.txt），同时指定了文件的保存路径。参数 True 表示如果已存在同名文件则覆盖。另外还指定了文件类型为 ASCII。接着，我们使用 TextStream 对象（变量名为 file）向文件中写入了三行文本，最后使用 Close 方法关闭文件。这样就完成了创建文件并写入数据的操作。

示例二

下面是另一个例子，演示如何使用 CreateTextFile 方法创建一个 Unicode 格式的文本文件：

Set fso = CreateObject("Scripting.FileSystemObject")Set file = fso.CreateTextFile("C:\test.txt", True, True)file.WriteLine("这是第一行。")file.WriteLine("这是第二行。")file.WriteLine("这是第三行。")file.Close

这个例子与上面的例子类似，区别在于第三个参数指定了文件类型为 Unicode。由于中文字符需要使用 Unicode 编码才能正确显示，因此使用 Unicode 格式创建文本文件时，需要使用字符串常量来写入中文字符。