<% dim fs, f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.CreateTextFile(request("hidFileName"),true) f.WriteLine(request("txtDescription")) f.Close set f=nothing set fs=nothing %>