![File 对象参考手册](http://img.voidme.com/vcimg/000/000/000/939_9e8_8d6.gif)
OpenAsTextStream 方法打开指定的文件,并返回一个供访问此文件的 TextStream 对象。
语法
FileObject.OpenAsTextStream(mode,format)
参数 | 描述 |
---|---|
mode | 可选的。如何打开文件(输入/输出模式)。
|
format | 可选的。以何种格式打开文件。忽略此参数,则文件以 ASCII 格式打开。
|
实例
<%
dim fs,f,ts
set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.GetFile("c:\test.txt")
Set ts=f.OpenAsTextStream(ForWriting)
ts.Write("Hello World!")
ts.Close
Set ts=f.OpenAsTextStream(ForReading)
Response.Write(ts.ReadAll)
ts.Close
set ts=nothing
set f=nothing
set fs=nothing
%>
输出:
Hello World!
dim fs,f,ts
set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.GetFile("c:\test.txt")
Set ts=f.OpenAsTextStream(ForWriting)
ts.Write("Hello World!")
ts.Close
Set ts=f.OpenAsTextStream(ForReading)
Response.Write(ts.ReadAll)
ts.Close
set ts=nothing
set f=nothing
set fs=nothing
%>
输出:
Hello World!
![File 对象参考手册](http://img.voidme.com/vcimg/000/000/000/939_9e8_8d6.gif)