简介对文件操作的组件

saintom

在以前的IIS版本中，你会感到对文件操作的限制有些过分，你只能读写一些文本文件，这种限制对于熟练的程序员是很难受的，例如，无法直接得到诸如一个文件是否存在的信息。

幸好，IIS4.0版已经令人激动的将这种局面进行了改变。在这个版本的Active Server Pages中有很多组方法、属性、集合来对文件进行操作处理。利用Active Server Pages脚本，你就几乎完全可以控制服务器的文件系统。

作到这些，需要如下的组件：

·FileSystemObject：这个对象包括了一些基本的对文件系统进行操作的方法，比如说，复制和删除文件夹或者文件

·TextStream：这个对象用来读写文件

·File：它的方法和属性被用来处理单独的文件。

·Folder：它的方法和属性被用来处理文件夹。

在读完后面部分后，你会明白这些具体操作过程是怎样进行的，那么如果希望了解全部的有关集合、属性和方法列表，参见本书附录A的有关部分。

在一个文件中读写数据

这部分介绍如何读写一个文本文件。这对文本文件有很多用处，包括下面这些。

·一个常用的日志，利用文本文件记录访问者的活动以供日后参考。你可以记录诸如访问者IP地址，浏览器类型等等你能得到而且想要了解的东西。

·Form中的数据，你可以将用户在Form的文本框中填写的东西记入文本文件，尽管使用数据库会更加有效。

·每日新闻，将每日的新消息记录到文本文件，然后可以在很多文件中读出来显示

对文本文件的写操作

要创建并且写入一个文本文件，你应当使用FileSystemObject和TextStream对象。首先，你需要创建一个FileSystemObject对象的事例，然后，再利用CreateTextFile()以该事例创建一个TextStream对象的事例，最后利用TextStream对象的WriteLine()方法来写入文件。下面是这个例子：

<%

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)

Set MyTextFile=MyFileObject.CreateTextFile(“c:\mydir\test.txt”)

MyTextFile.WriteLine(“欢迎进入xxx网络ASP教程文件操作示例！”

MytextFile.Close

%>

这个例子创建了一个名字为test.txt的文件，该文件位于c:\mydir\，WriteLine()方法被用来将那一句话写入该文件。最后，这个TextStream对象的事例关闭并且释放所有资源，下面部分将对每一个步骤进行仔细解释。

注：如果你需要虚拟路径转化为真实路径（这样操作使得站点具有更强的可移植性），可以用Server.MapPath()方法，例如下面这个例子：

PhysicalPath=Server.MapPath(“/private/test.txt”)

假设虚拟路径/private对应于真实路径c:\net\private，那么这个PhysicalPath的值将是c:\net\private\test.txt

CreateTextFile()方法用来创建一个新的文本文件，当这个方法被调用，那么就返回一个TextStream对象，这个方法有一个必须的参数和两个可选的参数。

·FileSpecifier,限定要创建的文件及路径，如果没有这个参数，显然是要报错的。

·Overwrite,这个参数是可选的，默认为TRUE，如果存在同名的文件，依据这个参数判断是否进行覆盖操作，如果赋为FALSE，那么存在同名文件时会返回错误信息。

·Unicode,这个参数可选，默认为False，指示该文件是否用ASC码形式进行创建和保存。如果选择TRUE，将以Unicode方式创建。

再利用CreateTextFile()方法创建了文本文件后，你就可以使用TextStream对象来对文件进行读写，在写操作时，有如下的方法：

·Write(String).这个方法将一个字段写入文本文件。

·WriteLine(String)，这个方法是在文件中添加字串和一个分行符，这里面的string参数可选，如果没有的话，则添加一个分行符。

·WriteBlankLines(lines)，顾名思义，这是允许用户在文件中指定数目个分行符。

·close.这个方法就是关闭一个打开的TextStream文件并释放其占用的资源。

下面是一个连续在文件中输出32行同样字符串的例子脚本：

<%

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)

Set MyTextFile=MyFileObject.CreateTextFile(“c:\mydir\test.txt”)

For i=1 to 32

    MyTextFile.WriteLine(“Hello World!”)

Next

MyTextFile.Close

%>

在文本文件中读取和追加数据

这里，首先要做的依然是创建一个FileSystemObject对象的事例，然后，利用OpenTextFile()方法来创建一个TextStream对象的事例，最后，你就可以用TextStream对象的ReadLine方法来对文件读取，下面是个例子：

<%

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)

Set MyTextFile=MyFileObject.OpenTextFile(“c:\mydir\test.txt”)

While not MyTextFile.AtEndOfStream

   Response.Write(MyTextFile.ReadLine)

Wend

MyTextFile.Close

%>

这个脚本将文本文件Test.txt文件中所有的内容读出来并且显示在浏览器上。如果文件不存在，回显示相应错误信息（在下一个部分，你会学到怎样检测一个文件是否存在）

其中While…Wend循环是将文件内容一行一行的循环读取，其中如果没有到达文件末尾，那么AtEndOfStream属性就会是False，直到末尾时变为True。

下面是读取文件时可能会用到的属性：

·AtEndOfLine。这个属性判断是否到了文件中一个特定行的末尾，如果不是，则为False，反之为True

·AtEndOfStream。就是这个例子中用到的，判断是否到了该文件的结尾并依此返回True和False

·Column。这个属性判断当前字符在该行的位置，返回一个整数值。

·Line。这个属性判断当前行在文件中的行数，返回一个整数值

除了使用ReadLine方法以外，你当然还可以使用Read()方法。Read()方法会从指定打开的文本文件中返回指定数目个字符。下面是用这个方法的示例：

<%

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)

Set MyTextFile=MyFileObject.OpenTextFile(“c:\mydir\test.txt”)

While NOT MyTextFile.AtEndOfLine

   Response.Write(MyTextFile.Read(1))

WEND

MyTextFile.Close

%>

这个脚本从文本文件中接受第一行，每次接受显示一个字符，利用AtEndOfLine属性一直到行尾截止，由Read(1)一个一个读取。

下面是从文本文件读取数据时要用到的方法

·Read(Number).从文本文件中读取限定数目个字符

·ReadLine.从文本文件中读取一行（换行符不返回)

·ReadAll.这个方法接受TextStream文件的所有内容

·Skip(Number).这个方法从一个打开的文本文件中跳过指定数目个字符

·close关闭当前打开的文件并释放所占用的资源。

一般说来，OpenTextFile()方法是用来读取数据的，但是你也可以用它追加数据信息，例如，你希望在该文本数据中追加一些新内容，可以见下面的示例：

<%

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)

Set MyTextFile=MyFileObject.OpenTextFile(“c:\mydir\browser.log”,8,TRUE)

MyTextFile.WriteLine(Request.ServerVariables(“HTTP_USER_AGENT”))

MyTextFile.Close

%>

这个脚本用于在网站中创建一个日志文件。无论什么时候这个脚本执行，此时的浏览器类型就会追加到该日志文件中，浏览器信息由ServerVariables集合接收。

注：有关ServerVariables集合的情况参见本书的第14章有关小节

这里面需要说明的是，如果browser.log不存在，则会自动建立，这是使用了OpenTextFile()方法的两个参数：IOMode和Create参数。

下面介绍针对于OpenTextFile()方法的所有参数：

·FileSpecifier，限定要进行读写或者追加的文本文件名称

·IOMODE，可选参数，指示该文件是被用来读，写还是追加。默认为1表示读，设为2表示进行写操作，进行追加操作则设为8。

·Create，可选参数，如果文件不存在是否创建，默认为False，如果希望进行创建，则设为TRUE

·Format，可选参数，指示文件是ASCII码制格式还是Unicode格式，作为默认的ASCII码制文件，其值为-2，如果希望设为Unicode格式，此参数设为-1

你不能在当前版本的Active Server Pages中使用常量，例如，你如果希望进行文件 追加，你必须使用数字8作为参数而不是什么常量。