<form action="scrivi.asp?salva=si" method="post"><textarea name="campo1"></textarea><textarea name="campo2"></textarea>
<input type="submit" name="Submit" value="Submit">
</form>
<%
if request("salva")="si" then
Dim objFSO, objCreatedFile, objOpenedFile
Const ForReading = 1, ForWriting = 2, ForAppending = 8
'Create the FSO.
Set fso = CreateObject("Scripting.FileSystemObject")
'Set f = fso.OpenTextFile(server.mappath("/scrivi/news.txt"), 8)
Set f = fso.OpenTextFile(server.mappath("/scrivi/news.txt"), ForWriting, True)
contenuto="&t1="&Request.Form("campo1")&"&t2="&Req uest.Form("campo2")&"&fine=fine"
f.Write contenuto
f.Close
end if
%>