Problema in scrittura file txt con FSO

[yappappeo]

Ciao a tutti,

ho un problema nella scrittura di file txt all'interno di una directory. Ho cercato altrove nel forum ma non ho trovato cose simili.

Ho il seguente codice:

Dim tipo, titolo, testo, data, ora
tipo = Trim(Request.Form("tipo"))
titolo = Trim(Request.Form("titolo"))
testo = Trim(Request.Form("testo"))
data = Trim(Request.Form("data"))

Dim nomefile
nomefile = Year(date()) & Month(date()) & Day(date()) & Hour(time()) & Minute(time()) & Second(time()) & ".txt"

Dim ApriFile, FSO, Path
Path = "C:/Documents and Settings/dir/news/" & nomefile
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set ApriFile = FSO.CreateTextFile(Path)
ApriFile.Writeline tipo
ApriFile.Writeline "<dt>" & titolo
ApriFileA.Writeline "<span>" & data & "</span></dt>"
ApriFile.Write "<dd>" & testo & "</dd>
ApriFile.Close
Set ApriFile = Nothing
Set FSO = Nothing

Ora, a video non mi appare alcun errore e il file viene creato, ma risulta essere senza i contenuti passati dalla form. Il file viene nominato correttamente, ma al suo interno appaiono solo i tag che gli passo direttamente nei comandi 'Write'.
La form che invia i file dovrebbe funzionare (è collegata anche a un db al quale passa altri dati...)

Dove sto sbagliando... :master:

Grazie

[Santino83_02]

boh non ricaverà i dati dalla form.. stampati a video quei tipo/data/titolo e vedi se sono valorizzati o meno

[yappappeo]

Ciao Santino83_02, grazie

Ho provato e la form funziona. Ho creato una pagina "test" per stampare tutti i campi della form e vengono correttamente visualizzati.
Allora, in teoria dovrebbe poterli scrivere anche nel txt, ma non lo fa... mmm