动态网页制作:ASP中FSO的神奇功能

80酷酷网    80kuku.com

  fso|动态|网页在ASP中,FSO的意思是FileSystemObject,即文件系统对象。

  我们将要操纵的计算机文件系统,在这里是指位于web之上。所以,确认你对此拥有合适的权限。理想情况下,你可以在自己的机器上建立一个web,这样就能方便地进行测试。如果运行于平台,请试一试微软公司的免费个人WebPWS。

  FSO模型对象

   DriveObject:驱动器对象供存取磁盘或者网络驱动器
   FileSystemObjectObject:文件系统对象供存取计算机的文件系统
   FolderObject:文件夹对象供存取文件夹的所有属性
   TextStreamObject:文本流对象供存取文件内容

  你可以使用上面的对象做计算机上的任何事情,也包括破坏活动;-(所以,请小心使用FSO。在web环境中,存储信息是非常重要的,比如用户信息,日志文件,等等。FSO提供了一个强大且简单的方法高效率地保存数据。在这篇文章里面,着重讨论FileSystemObject和TextStream对象。

  FSO由微软公司提供支持,对于非系统,大概不能再使用ASP。

  怎么样使用FSO?

  为了使用FSO来执行所有的工作,首先要创建对象,代码就象下面这样:

<%Setfso=Server.CreateObject("Scripting.FileSystemObject")
%>


  这样就建立了FSO并且赋予变量fso,接着就可以使用熟悉的object.method语法来执行文件系统的操作〔查看VisualBasic文档,获取更多的关于对象和对象向导编程的知识〕。在这里,我们可以使用fso.method或者fso.property,这些将在下面的例子中看到。

  FSO模型位于由微软提供的脚本运行时间DLL文件中,它是scrrun.dll。你可以在任何应用程序中引用这个DLL文件,比如MSAccess,Word。就是说,并非仅仅限制在ASP中应用它。

  这里有一个简要的FSO方法列表:


  如果想了解完整的FSO方法与属性,请查阅微软MSDN。下面来看几个例子。

  假设你想创建一个简单的留言簿,你可以建立一个,在其中存储用户的信息。然而,如果并不需要的强大功能,使用FSO来存储信息将节省你的时间和金钱。并且,一些ISP也许限制了web上的应用。

  假设你在一个表单中收集了一些用户信息,这里是一个简单表单HTML代码:

<html>
<body>

<formaction="formhandler.asp"method="post">
<inputtype="text"size="10"name="username">
<inputtype="text"size="10"name="homepage">
<inputtype="text"size="10"name="Email">
</form>
</body>
</html>


  再看看formhandler.asp中处理表单的代码:

<%
'Getforminfo
strName=Request.Form("username")
strHomePage=Request.Form("homepage")
strEmail=Request.Form("Email")

'createthefsoobject
Setfso=Server.CreateObject("Scripting.FileSystemObject")


  迄今为止,还没有新鲜的东西,无非是获取表单域的值并且赋值到变量。下面出现了有趣的部分-写文件:

path="c:empest.txt"
ForReading=1,ForWriting=2,ForAppending=3

'openthefile
setfile=fso.opentextfile(path,ForAppending,TRUE)

'writetheinfotothefile
file.write(strName)&vbcrlf
file.write(strHomePage)&vbcrlf
file.write(strEmail)&vbcrlf

'closeandcleanup
file.close
setfile=nothing
setfso=nothing


  回想一下,OpenTextFile方法返回一个TextStream对象,它是FSO模型中的另外一个对象。TextStream对象揭示了操作文件内容的方法,比如写、读一行、跳过一行。VB常量vbcrlf产生一个换行符。

  在OpentextFile的命令参数中定义了TRUE,这就告诉了系统,如果文件不存在,就创建它。如果文件不存在,并且没有定义TRUE参数,就会出错。

  现在转到目录c:emp,打开test.txt,你可以看到如下的信息:

User'sname
User'shomepage
User'semail


  当然,这些单词可以被输入在表单中的任何内容所替换。

  现在已经有了一些用户信息保存在文件中,就像一个简单的。假设有一个用户想了解所有的访问者,就要从登记的信息中分离出相关部分,因为没有象一样拥有结构化的列。

  我们知道,在所创建的文件中,第1行是用户名,第2行是他们的主页,第3行是他们的电子邮件地址。随后登记的用户也是按照这样的结构存储他们的信息,所以每3行将包含一个用户的登记信息。知道了这些,就可以编写下面的代码来显示信息:

<%
'createthefsoobject
setfso=Server.Createobject("Scripting.FileSystemObject")
path="c:empest.txt"

'openthefile
setfile=fso.opentextfile(path,1)<--For
reading


  接着,分析每一行,并且格式化数据:

dountilfile.AtEndOfStream
Response.write("Name:"&file.ReadLine&"")
Response.write("HomePage:"&file.ReadLine&"")
Response.write("Email:"&file.ReadLine&"<p>")
loop

'closeandcleanup
file.close
setfile=nothing
setfso=nothing
%>


  这里仅仅做了一个非常简单的输出,但是你可以根据情况包含表格或者DHTML表单信息。

  如果已经正确地建立并写入了文件,上面的小小循环将合适地列出中的每一个人的信息。ReadLine方法读取1行内容,直到遇到换行符,随后的ReadLine调用将读取下一行。AtEndOfStream是TextStream对象的属性,它告诉我们何时遇到文件的尾部。

  假设由于某种原因,我们没有正确地形成文件,如果一个用户只有2行信息而不是3行,那么就会产生一些错误。我们这里的循环取回文件中的下3行信息,如果没有3行多的信息,就将出现如下的错误信息:

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: