求asp代码,点击按钮1保存文本框一中客户的意见和保存文本框二中的客户姓名到服务器的1.txt中
展开全部
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!--注意这里的编码,如果是utf-8,那么你的txt也要是utf-8,修改的办法:记事本打工txt文件,另存为,下面就有选择编码,要不然这里就用gb2312-->
<title>无标题文档</title>
</head>
<body>
<%
if request("a")="add" then
Dim FSO,path,text,str,n,r_str
Set FSO=Server.CreateObject("Scripting.FileSystemobject")
path=Server.MapPath("1.txt")
str=Request("str")
n=request("n")
r_str=str&"|"&n
If str<>Empty and Then
Set text=FSO.OpenTextFile(path,8)
text.WriteLine(r_str)
End If
Set FSO=nothing
text.close
end if
%>
<form action="?a=add" method="get">
内容:<input name="str" type="text" /><br>
姓名:<input name="n" type="text" /><br>
<input type="submit" value="提交">
</form>
</body>
</html>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询