FSO使用教程4 -- 如何使用FSO打开文件
日期：2011-12-23 浏览次数：20979 次
如何使用FSO打开文件-FSO使用教程4
了解了文件复制，删除，移动及重命名后，接下来让我们学习如果存取文件里面的数据。文件存取所必须用到的TextStream对象是FileSystemObject的子对象。其建立的方法有OpenTextFile及CreateTextFile两种，使用实例如下：
Set fs = Server.CreateObject("Scripting.FileSystemObject")
'再建立一个TextStream类型对象
Set txt = fs.OpenTextFile(参数...)
或者：
Set txt = fs.CreateTextFile(参数...)
我们在建立了TextStream对象之后，接下来我们可以调用附属于TextStream对象的ReadLine、WriteLine、Read、ReadAll、Write...等方法来存取文件的内容。
四、下面我们首先讲解如果用FSO打开文件：
方法：OpenTextFile
调用格式：
注意事项：（后两个参数可省略）
- 打开模式：可以有三种设置值：
| 设置值 | 意义 |
| 1 | 打开成只读的文件 |
| 2 | 打开成只写的文件，原文件内容会先被清除 |
| 8 | 打开成只写的文件，并保留原文件内容，而数据会从文件的最后面写入 |
如果文件被打开“只读”文件，接下来我们只能调用TextStream对象的ReadLine、Read及ReadAll方法来读取文件的内容；如果文件打开为“只写”文件，则只能调用WriteLine及Write方法来写入数据到文件中。省略状态下表示将文件打开为“只读”文件。
- 是否自动创建文件：
可以设轩成True或False，若设置成True，则打开文件时不存在就自动创建新文件并打开；如果设置成False时，则打开的文件必须为已存在文件，否则会产生“找不到文件”的错误（错误编码=53）。省略状态下表示打开的文件必须为已存在文件。
源码示例：
<%
'================================================
'作者：爱易学习网
'网址：http://www.aiyiweb.com/
'源码：FSO移动文件，重命名文件示例
'时间：2005年12月17日
'================================================
Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath("File1.txt")
'将File1.txt打开成只读文件，File1.txt必须是只已存在的文件
Set txt = fs.OpenTextFile(File) '参数二三均可省略
'将File.txt打开成只读文件，File1.txt若不存在，则先创建文件
Set txt = fs.OpenTextFile(File,1,True)
'将File.txt打开成只写文件，File1.txt若不存在，则先创建文件
Set txt = fs.OpenTextFile(File,2,True)
'将File.txt打开成只写文件，File1.txt必须是已存在的文件
Set txt = fs.OpenTextFile(File,8)
%>
