1.AtEndOfStream
该属性表明是否已到达整个文本文件末尾。其值为"TRUE"或"FALSE"
2.CreateTextFile
用来创建新的文本文件
3.OpenTextFile()方法中的参数
saucer(思归)所写的:
代码如下 | 复制代码 |
Set f = fso.OpenTextFile("c:testfile.txt", ForWriting, True) |
ForWriting值为2,表示打开一个可写的文本文件
为1,表示打开一个可读的文本文件
为8,表示要附加数据
True是表示如果没有这个文件,将新建一个
这个参数可选True或False,表明文件不存在时是否创建
实例1
读文件:
代码如下 | 复制代码 |
<% set myfileobject=server.createobject("scripting.filesystemobject") set mytextfile=myfileobject.opentextfile("c:mydirtest.txt") while not mytextfile.atendofstream response.write(mytextfile.readline) wend mytextfile.close %> |
写文件:
代码如下 | 复制代码 |
<% set myfileobject=server.CreateObject("Scripting.FileSystemObject") set mytextfile=myfileobject.CreateTextFile("c:mydirtest.txt") mytextfile.WriteLine mytextfile.close %> |
实例2
FSO打造最简单的访问计数器
代码如下 | 复制代码 |
<% '输出计数 %> |
在需要统计和显示计数的地方可以用include的方式引入这个文档。
代码如下 | 复制代码 |
但是如果是html之类静态页面,则可以通过script脚本的方式来使用这个简单的计数器。
那么Counter.asp则需要这么写了
代码如下 | 复制代码 |
<% response.Write("document.write("" %> |
需要引用的html静态页里可以通过Script脚本来使用计数器:
代码如下 | 复制代码 |