ASP编程：ASP编程进门进阶（十八）：FSO组件之文...

ASP脚本是采用明文（plaintext）方式来编写的。fso|编程|fsoFSO中除能够对驱动器、文件夹的操纵之外，功效最壮大的就是对文件的操纵了。它能够用来记数、内容办理、搜刮还可天生静态HTML页面等等。

1、fso.OpenTextFile
无需多说，fso.OpenTextFile就是翻开某个文件了，一样平常情形之下是翻开的txt文本文件。以是起首我们先创建一个txt文件，然后经由过程FSO来读取个中的内容。

1，info.txt

name:cnbruce
sex:male



创建了该文件，上面再做个ASP页面，固然最好两个文件是在统一目次下。

2，opentxt.asp


<%
whichfile=server.mappath("info.txt")
Setfso=CreateObject("Scripting.FileSystemObject")
Settxt=fso.OpenTextFile(whichfile,1)
rline=txt.ReadLine
rline=rline&"<br>"&txt.ReadLine
Response.Writerline
txt.Close
%>




必要注重：不管是经由过程FSO翻开驱动器、翻开文件夹、翻开文件，和今后要打仗到的翻开数据库，都只能是翻开相对物理路径地点。但一样平常情形是上传到空间服务商那,不克不及很间接地懂得到本人文件的地点地位，以是激烈保举利用server.mappath办法：平台移植性强，合用性强。

CreateObject("Scripting.FileSystemObject")创建了FSO组件的毗连，fso.OpenTextFile(whichfile,1)翻开了info.txt该文件。参数“1”暗示“ForReading：以只读体例翻开文件。不克不及写这个文件。”，其他另有参数“2”暗示“ForWriting：以写体例翻开文件”，参数“8”暗示“ForAppending：翻开文件并从文件开端入手下手写”。

翻开了该文件，接上去是否是要显现文件中的内容？那就经由过程txt.ReadLine办法读取文本中的一整行，假如必要持续读取下一行，则持续利用txt.ReadLine办法。固然初此另有别的的读取办法，好比txt.Read(7)读取指定命量的字符，txt.ReadAll前往文本中的全体内容。

2、fso.CreateTextFile
如fso.CreateFolder创建文件夹般，fso.CreateTextFile则是创建文件了。

3，creattxt.asp


<%
whichfile=server.mappath("info.txt")
Setfso=CreateObject("Scripting.FileSystemObject")
SetMyFile=fso.CreateTextFile(whichfile,True)
MyFile.WriteLine("MyNameIsCN-Bruce")
MyFile.WriteLine("MySexIsMale")
MyFile.Close
%>
<ahref="opentxt.asp">检察内容</a>




本次创建的文件是上一info.txt文件，fso.CreateTextFile(whichfile,True)个中的参数true即暗示能掩盖已有文件。创建后必要向内里增加数据就接纳“MyFile.WriteLine”了。

那如今就能够创建一个复杂的文本记数器了，还记得之前的记数？：1，经由过程application、session、global.asa举行记数；2，经由过程Counter组件举行记数。但二者都有通病，就是不克不及保留，假如服务重视新启动后，是否是一切记数全体清空了呢：）那如今就能够利用文原本纪录数据了，即便重启，下次提取的也仍是该文件。

实验：文本计数器

起首创建一记数的文本文件counter.txt，设定初始值为“1”

4，counter.txt

1


接着是记数的ASP文件，功效是显现文本的记数，本做加1的记数，然后还要将新的记数写进文本文件。

5，txtcount.asp


<%
whichfile=server.mappath("counter.txt")
翻开文件并将其值读取，最初封闭毗连开释资本
setfso=createobject("Scripting.FileSystemObject")
setopenfile=fso.opentextfile(whichfile,1)
visitors=openfile.readline
openfile.close
页面显现记数内容并做加1运算
response.write"您是本页的第"&visitors&"位访客"
visitors=visitors+1
将新的数值增加写进到文本，最初封闭一切毗连开释资本
setcreatfile=fso.createtextfile(whichfile)
creatfile.writeLine(visitors)
creatfile.close
setfso=nothing
%>




那依据这个能够持续地扩大内容：好比让记数用数字图片显现。固然条件就是你必要0-9的10张记数图片，并将此图片放于img文件夹中。
下为一加强的txtcount.asp内容代码


<%
whichfile=server.mappath("counter.txt")

setfso=createobject("Scripting.FileSystemObject")
setopenfile=fso.opentextfile(whichfile,1)
visitors=openfile.readline
openfile.close
CountLen=len(visitors)
response.write"您是本页的第"

fori=1to6-countLen暗示最年夜值999999
response.write"</img>"
next
response.write"位访客"

visitors=visitors+1
setcreatfile=fso.createtextfile(whichfile)
creatfile.writeLine(visitors)
creatfile.close
setfso=nothing
%>




本程序中接纳的是mid函数，该函数的感化是前往某字符串中从第几位字符入手下手的几个字符。格局即为：Mid(string,start,length)
<scriptlanguage=vbs>
cn_string="cnbrucelovecnrose"
cn_start=9
cn_length=4
alert(mid(cn_string,cn_start,cn_length))
</script>
[Ctrl+A全体选择提醒：你可先修正部分代码，再按运转]
</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件，简单易用，无需专业技术支持。

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。

仓酷云

Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: