假设你在一个表单中收集了一些用户信息,这里是一个简单表单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
当然,这些单词可以被输入在表单中的任何内容所替换。
【说明】:本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!