马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况;fso|教程怎样利用FSO读取文件-FSO利用教程6
TextStream工具所供应用来读取文件的办法有三种:ReadLine、Read及ReadAll。在挪用这几个办法之前,必需注重文件开头的成绩----当全部文件的内容都被读完时,若再挪用ReadLine,Read、ReadAll等办法,则会发生“输出超越文件开头”的毛病(毛病编码=62)。
因而对照好的习气是在挪用ReadLine、Read及ReadAll之前,先读取TextStream工具的atEndOfStream属性值,以判别文件是不是已抵达开头的地位,其程序大抵以下:
txt为一TextStream工具
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
挪用txt.ReadLine、Read、ReadAll等办法
EndIf6、怎样用FSO读取文件:
办法1:ReadLine
挪用格局:(从文件中读取一行数据)
txt为一TextStream工具
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
Line=txt.ReadLine读取一行数据
Response.WriteLine&"<br>"
EndIf办法2:ReadAll
挪用格局:(把文件一切内容一次读出)
txt为一TextStream工具
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
Content=txt.ReadAll读取全部文件的数据
Lines=Replace(Content,vbCrlf,"<br>")将文本内分行字符vbCrlf换成HTML换行标志"<br>"
Response.WriteLines
EndIf办法3:Read(N)
挪用格局:(从文件中读取N个字节的数据)
txt为一TextStream工具
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
Content=txt.Read(30)读取30个字节的数据
Response.WriteContent
EndIf
源码示例1:(使用ReadAll办法读取File1.txt内容,并显现出来)
<%
==================================================
阿里西西
网址:http://www.alixixi.com/
源码:FSO读取文件全体内容示例
工夫:2005年12月17日
==================================================
Setfs=Server.CreateObject("Scripting.FileSystemObject")
File=Server.MapPath("File1.txt")
Settxt=fs.OpenTextFile(File)
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
Content=txt.ReadAll读取全部文件的数据
Lines=Replace(Content,vbCrlf,"<br>")将文本内分行字符vbCrlf换成HTML换行标志"<br>"
Response.WriteLines
EndIf
%>
源码示例2:(使用ReadLine办法读取File1.txt一行数据内容,并显现出来)
<%
================================================
阿里西西
网址:http://www.alixixi.com/
源码:FSO读取文件一行内容示例
工夫:2005年12月17日
================================================
Setfs=Server.CreateObject("Scripting.FileSystemObject")
File=Server.MapPath("File1.txt")
Settxt=fs.OpenTextFile(File)
IfNottxt.atEndOfStreamThen先断定还没有抵达开头的地位
Line=txt.ReadLine读取一行数据
Response.WriteLine&"<br>"
EndIf
%>
ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊! |