【www.gdgbn.com--php应用】

Active Server Pager(动态服务器主页，简称ASP)，通过读写服务器的文件，结合script语言（VBscript或Jscript）和html码可以方便地实现页面计数器功能。现流行的ASP教材和网络上的ASP教程都谈到过ASP计数器的设计问题，但是都过于简单，比如没有提到怎样实现计数器脚本和主页面的分离以及图象计数器的实现等。下面就作者为单位制作NT web站点的经验，举实例循序渐进谈谈关于ASP计数器的设计，希望能给ASP的初学者和对ASP WEB编程有兴趣的网友一些启发。
　　　　　　　　　　　　　　（一）简单的计数器
　　ASP内含五个内置的"Active Server Components"(ActiveX服务器组件)，即Database Access component(数据库访问组件)、File Access component(文件访问组件)、Ad Rotator component(广告轮播器组件)、Brower Capabilities component(浏览器信息组件)、Content Linking component(内容链接组件)。我们下面要设计的计数器，就是通过其中的File Access component(文件访问组件)来读写服务器文件来实现。算法思路是：在服务器端用一个文本(ASCII)文件存放计数数值，每当页面被访问时就从文件中读出数值，显示给用户，并且使数值加1，把增加后的数值写回到文件。
　　写入数据到一个服务器计数文件的ASP语句和说明如下：
CounFile=Server.MapPath("用来存放计数器值的文件名")
　　"Server服务器访问方法MapPath(path)是将存放计数器值的文件所在的路径　　　转换成物理路径
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
　　"使用方法CreateObject定义对象FileSystemObject
SET OutStream=Server.CreateTextFile(FileObject,True,False)
　　"使用对象FileSystemObject提供方法CreateTextFile产生文本文件，其中参　　　数"True"表示覆盖原来的文件，"False"表示文件为ASCII类型
OutStream.WriteLine "要写入的数据"
　　"OutStream.WriteLine为往文件写入一行数据
　　从一个服务器文件读取数据的ASP语法如下：
CounFile=Server.MapPath("用来存放计数器值的文件名")
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
SET InStream=Server.OpenTextFile(FileObject,1,false,false)
　　"使用对象FileSystemObject提供方法OpenTextFile产生文本文件，

本文来源：http://www.gdgbn.com/jiaocheng/7546/