---

ASP TextStream 对象是一种内置的 ASP 对象，它用于在 Web 服务器上进行文件的读写操作。使用 TextStream 对象可以让开发者方便地读取和写入文本文件，同时也支持一系列的文本操作，例如截取字符串、替换字符串等，下面我们将具体介绍TextStream 对象的使用。

创建 TextStream 对象

创建 TextStream 对象需要使用 FSO（FileSystemObject）对象，开发者需要将 FSO 对象实例化后才能使用 TextStream 对象。

Set fs=Server.CreateObject("Scripting.FileSystemObject")  '创建 FSO 对象
Set f=fs.OpenTextFile("c:\test.txt", ForReading)  '创建 TextStream 对象

在上述代码中，我们先使用 CreateObject 方法创建了FSO对象，然后使用 FSO 对象提供的OpenTextFile 方法创建了 TextStream 对象。ForReading 指定了文件的读取权限，还可指定写入权限。其他可用的权限参数如下：

• ForWriting ：表示写入
• ForAppending ：表示追加

读取文件内容

在创建了 TextStream 对象后，我们可以使用它提供的 ReadAll 方法来读取文件中的所有内容，或者使用 ReadLine 方法一行一行地读取文件，像这样：

Set fs=Server.CreateObject("Scripting.FileSystemObject") '创建 FSO 对象
Set f=fs.OpenTextFile("c:\test.txt", ForReading) '创建 TextStream 对象
Dim content
content = f.ReadAll() '读取整个文件
response.write(content)

如果我们只需要读取一行，可以采用以下代码：

Do While f.AtEndOfStream = False
    response.write(f.ReadLine())
Loop

在上面的代码中，我们使用了AtEndOfStream方法（读取文本文件是否到达文件末尾的标志）

写入文件内容

如果需要将数据写入文本文件，我们可以使用 TextStream 提供的方法来实现。与读取文件类似，我们同样需要使用 OpenTextFile 方法来打开文件，同时还需要指定写入的权限，然后调用 Write 或者 WriteLine 方法写入文件内容，像这样：

Set fs=Server.CreateObject("Scripting.FileSystemObject") '创建 FSO 对象
Set f=fs.OpenTextFile("c:\test.txt", ForWriting) '创建 TextStream 对象
f.Write "Hello !" & vbCrLf '写入一行
f.Close '关闭文件

在上面的代码中，我们使用了 Write 方法将一行字符串写入到文件中。

其他常用方法

• SkipLine ：跳过文本文件的下一行
• Skip ：从当前文件指针开始向后跳过指定数量的字符或行数
• Read ：从当前指针开始向后读取指定数量的字符
• ReadLine ：从当前指针开始向后读取指定数量的字符行

总结

TextStream 对象是一种强大的文件读写对象，可以方便、高效地对文本文件进行读写和操作，开发者可以根据具体需求来选择不同的方法和权限参数。数据确定基于脚本创建文本文件或者读取/写入现有文本文件，或者进行文本操作，TextStream 对象都是非常好的选择。