日期:2014-05-17  浏览次数:21034 次

请asp大侠帮我!建一个新ASP文件,让其读取下列表单中的数据,并将数据写入文件12345.txt中。
<%response.expires=0%>
<HTML>
<HEAD>
</HEAD>
<BODY><FORM>
<table align="center" bgcolor="white" border="0" ><tr><td><h2 align=center>调查表</h2></tr>
<tr><td><hr></tr>
<tr><td>用户名:<input type=text size=10 name=name></tr>
<tr><td>密码:<input type=text size=8 name=pass></tr>
<tr><td>电子邮箱:<input type=text size=12 name=email></tr>
<tr><td>家庭住址:</tr>
<tr><td><input type=text size=15 name=dz></tr>
<tr><td>就读的院系:<input type=text size=12 name=xi></tr>
<tr><td>个人爱好:<input type="checkbox" name="checkbox" value="checkbox">跳舞
<input type="checkbox" name="checkbox" value="checkbox">唱歌
<input type="checkbox" name="checkbox" value="checkbox">打牌
<input type="checkbox" name="checkbox" value="checkbox">阅读</tr>
<tr><td>性别:<select name="select" size="">
<option value="">男
<option value="">女
</SELECT>
血型:<input type="radio" name="radiobutton" value="radiobutton">A
<input type="radio" name="radiobutton" value="radiobutton">B
<input type="radio" name="radiobutton" value="radiobutton">AB
<input type="radio" name="radiobutton" value="radiobutton">O</tr>
<tr><td><input type=submit name=tj value=提交></tr></table></FORM>
</HTML>

------解决方案--------------------
就不给你写具体的源码了,给你说一下步骤

1、 给你的FORM 指定action ,method 参数; 比如:action="?action=1"
2、 在本页面头部加上表单数据获取代码(因为action指定的是?action=1,所以提交的地址是本页面),获取表单数据用Request.Form("参数名")
3、 建立一个Set FSO = Server.CreateObject("Scripting.FileSystemObject") 如果不会使用这个对象,请度娘。
4、 没啥好说的了,用FSO把读取的数据保存起来就OK
------解决方案--------------------
下面是fso操作部分,你把据,提交到这个页面接收,用字符串整到一起
就可以写入12345,win7不要写入C盘,有权限限制,写入其它盘
VBScript code

<%
Dim a
a = "1"
Dim fs,tfile
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set tfile=fs.CreateTextFile("d:\12345.txt")
tfile.WriteLine(a)
tfile.close
Set tfile=nothing
Set fs=nothing

%>