asp写文件代码

来源：百度知道 编辑：UC知道 时间：2024/06/01 23:44:45
要求：通过参数c传递给asp页面，asp把传递的参数追加到文件当中。

比如asp同一文件夹下有一个文件1.txt，内容为
“122”
则通过访问asp？c=100
文件1.txt的内容变成
“
122
100
”
希望大家帮帮我，谢谢！

<%
On Error Resume Next
if not isempty(request.QueryString("c")) then
set fs=Server.CreateObject("Scripting.FileSystemObject")
mbpath=server.MapPath("1.txt")
set tfile=fs.OpenTextFile(mbpath)
if err.number<>0 then
response.Write("模板文件不存在")
err.clear
response.End()
end if
mbcont=tfile.readall

set tfile=fs.createtextfile(server.MapPath("1.txt"))
tfile.write mbcont& vbCrLf &request("c")
end if
%>