柔情似水 发表于 2015-1-16 22:48:47

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>

</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。

小妖女 发表于 2015-1-20 05:02:25

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

活着的死人 发表于 2015-1-26 21:09:22

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

乐观 发表于 2015-2-4 20:32:37

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

精灵巫婆 发表于 2015-2-10 07:23:55

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

飘灵儿 发表于 2015-3-1 02:42:45

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

仓酷云 发表于 2015-3-10 12:29:21

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

小魔女 发表于 2015-3-17 06:47:13

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

爱飞 发表于 2015-3-24 00:24:22

学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
页: [1]
查看完整版本: ASP编程:ASP编程进门进阶(十八):FSO组件之文...