使用fso做留言本的问题

yzhxhwt yzhxhwt 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
用fso做留言本,现在做到了能创建一个文件,在asp页面里显示,也可以在页面里读一个文件,遇到的问题就是多个用户一起留言的时候,我如何读取这个文件按照格式显示?
留言页面代码:
<html>
<body>
<form action="proc_page.asp" name="form1" method="post">
姓名:<input type="text" name="txtName">
电话:<input type="text" name="phone">
Email:<input type="text" name="email">
<br>
留言内容:<textarea name="content" cols="45" rows="6">
</textarea>
<input type="submit" value="提交">
</form>
</body>
</html>





读取页面代码:
<html>
<body>
<%
dim fso,f1,f2,ts,s,f3,f4


set fso=server.createObject("scripting.FileSystemObject")
set ts=fso.OpenTextFile("E:\TestWrite\name.txt")
s=ts.readline()
Response.write("你的姓名是:"+s+"<br>")
ts.close


set f1=fso.OpenTextFile("E:\TestWrite\email.txt")
s1=f1.readline()
Response.write("你的email是:"+s1+"<br>")
f1.close


set f2=fso.OpenTextFile("E:\TestWrite\phone.txt")
s2=f2.readline()
Response.write("你的email是:"+s2+"<br>")
f2.close


set f3=fso.OpenTextFile("E:\TestWrite\content.txt")
s3=f3.readline()
Response.write("你的留言内容是:"+s3+"<br>")
f3.close


set f4=fso.OpenTextFile("E:\TestWrite\time.txt")
s4=f4.readline()
Response.write("你的留言日期是:"+s4+"<br>")
f4.close
%>
</body>
</html>

请教!
...全文
评论 3
收藏 已收藏
分享
返回顶部
yzhxhwt
ASP 28,401 成员 356,940 内容