第11章使用ActiveX服務器组件.docVIP

第11章 使用ActiveX服务器组件 ASP真正的威力在于它用组件扩展其功能的能力。这些功能包括文件管理、广告轮换等，实际上，前一章中讨论的数据库管理也是服务器上的一套组件。基于组件开发项目的思想是你不必自己编写每一件东西，而是可以利用别人编写的部件（组件），并将它们的功能添加到自己的项目中。在ASP编程中，脚本编程语言只提供了内部对象和功能，其他需要的每一项功能都必须由组件提供。 当你安装好ASP使用环境后，就可以使用一些它附带的组件，你还可以从Internet上下载无数的组件。你甚至可以创建自己的组件。 本章主要讨论以下内容： 文件访问组件 广告轮播组件 浏览器信息组件 内容链接组件 创建自己的组件 通过本章的学习，能让你成功地使用组件进行工作。 11.1 文件访问 ASP提供了FileSystemObject对象用于获得对文件、文件夹和驱动器的访问。使用FileSystemObject对象，可以创建File、Folder和Drive对象，分别用来代表计算机上的文件、文件夹和驱动器。每一个对象都有一些属性和方式来完成所需的任务。 11.1.1 使用文本文件 使用文本文件可以方便地记录一些少量的信息或者记录一些没有格式要求的信息。如网页的点击次数等。 1. 创建新文件 要创建新文件，首先要使用Server对象的CreateObject方法创建文件系统对象（FileSystemObject），再用文件系统对象的CreateTextFile方法创建文本流文件（TextStream），其后就可以使用该对象上的写方法写入一些内容，写完后用close方法关闭这些对象，最后释放这些对象。 最简单的创建一个新文件并写入一些内容的方式如例11-1所示： 【例11-1】创建一个文本文件 % Set objFS=Server.CreateObject(Scripting.FileSystemObject) set objTextS=objFS.CreateTextFile(C:\asp.txt) objTextS.WriteLine(hello,world!) objTextS.Close set objTextS=Nothing set objFS=nothing % 为了验证本例中的代码，首先应使用任一文本编辑器输入代码，以asp作为扩展名存放到指定目录中，启动浏览器后输入地址。完成后可通过文本编辑器打开C盘根目录下asp.txt文件，观察写入的内容。 代码中，第2行通过服务器对象创建一个文件系统对象（FileSystemObject）objRS。第3行通过执行文件系统对象的CreateTextFile方法，建立一个文本文件对象，并打开一个新建的文本文件。CreateTextFile方法完整格式为： Set 文件变量名=CreateTextFile(文件路径，覆盖方式，编码方式) 其中，文件路径是必须的，它指出要创建文件所在的目录路径及文件名。注意参数使用的是服务器上的物理路径，如果要得到某虚拟目录下的文件的物理路径，需要使用Server对象的MapPath方法。 覆盖方式是可选的，默认为TRUE，表示如果存在同名的文件，则覆盖该文件，即删除原来的文件内容，创建新的文件，若设置为FALSE，则当存在同名文件时会返回错误信息。 编码方式是可选的，默认为FALSE，表示使用ASC码形式进行创建和保存。如果选择TRUE，将以Unicode方式创建和保存。 代码中第4行向文件中写入一行内容为“hello,world!”。向文件中写入内容的方法主要有如下几种： write(字符串)：将一个字符串写入文本文件，但不换行。 writeLine(字符串)：将一个字符串写入文本文件，并随后写入一个换行符。字符串缺省时，表示只写入一个换行符。 WriteBlankLines(n)：写入n个换行符。 代码中第5行使用文本文件对象的close方法关闭文本文件。第6行撤消文本文件对象，第7行撤消文件系统对象。 2. 读取文件 要读取文件中的数据，首先需要用文件系统对象的打开文本文件（OpenTextFile）方法来创建一个TextStream对象，再用该对象的有关read或readline方法来对文件进行读取操作。 【例11-2】读取文件内容 % Set objFS=Server.CreateObject(Scripting.FileSystemObject) set objTextS=objFS.OpenTextFile(C:\asp.txt,1,False) do while not objTextS.AtEndOfStream thisline=objTextS.readline Response