ASP中FSO的神奇功能 - 写文件

作 者 : 甘冀平 ;


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

　　 假设你在一个表单中收集了一些用户信息，这里是一个简单表单html代码：

< html>
< body>

< form action="formhandler.asp" method="post">
< input type="text" size="10" name="username">
< input type="text" size="10" name="homepage">
< input type="text" size="10" name="email">
< /form>
< /body>
< /html>

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

< %
' get form info
strname = request.form("username")
strhomepage = request.form("homepage")
stremail = request.form("email")

' create the fso object
set fso = server.createobject("scripting.filesystemobject")

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

path = "c: emp est.txt"
forreading = 1, forwriting = 2, forappending = 3

' open the file
set file = fso.opentextfile(path, forappending, true)

' write the info to the file
file.write(strname) & vbcrlf
file.write(strhomepage) & vbcrlf
file.write(stremail) & vbcrlf

' close and clean up
file.close
set file = nothing
set fso = nothing


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

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

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

user's name
user's home page
user's email

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