Ciao Roby,
grazie ma all'inizio ho settatto delle costanti per le varie azioni.
Meglio se scrivo tutto lo script. Eccolo:

<% ' Costanti per I/O mode
Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8

Dim objFSO, objOpenedFile, textfile
Dim blnConferma, blnSalva, szAction, conferma, salva, text

objFSO = Request.Form("objFSO")
objOpenedFile = Request.Form("objOpenedFile")
textfile = Request.Form("textfile")
conferma = Request.Form("conferma")
salva = Request.Form("salva")
text = Request.Form("text")

blnConferma = False
blnSalva = False

'Conferma = OpenFile and Read
If conferma <> "" then
blnConferma = True
set objFSO = CreateObject("Scripting.FileSystemObject")
set objOpenedFile = objFSO.OpenTextFile(Server.MapPath(request.form("t extfile")), 1)
End If

'Salva = Open file and Write
If salva <> "" then
blnConferma = True
text = Request.Form("text")
set objFSO = CreateObject("Scripting.FileSystemObject")
set objOpenedFile = objFSO.OpenTextFile(Server.MapPath(request.form("t extfile")), 2)
objOpenedFile.Write (text)
objOpenedFile.close()

End If
%>

Il testo si apre in una textarea, dove l'utente può scrivere il nuovo testo, e al click sul salva viene sovrascritto il file...ma rimane vuoto!