[textfile.WriteLine] come andare a capo in file.txt

[Unideanet]

Dovendo tenere un promemoria degli isritti ad un modulo, ho fatto sì che i dati vadano ad un file.txt, col codice seguente, PROBLEMA: come faccio a far sì che ogni nuova immissione VADA a capo? per ora mi ricomincia sempre dall'inizio CANCELLANDO tutti i dati precedenti.

--codice usato--

Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set textfile = fso.OpenTextFile(Server.MapPath("iscritti.txt"), 2)
cinfo1 = request.form("info1")
cinfo2 = request.form("info2")
cinfo2bis = request.form("info2bis")
cemail = request.form("email")
cinfo4 = request.form("info4")
cinfo5 = request.form("info5")
cinfo6 = request.form("info6")
cinfo7 = request.form("info7")
cinfo8 = request.form("info8")
cinfo9 = request.form("info9")
cinfo10 = request.form("info10")
datiform = cinfo1 & "|" &cinfo2 & "|" &cinfo2bis & "|" &cemail & "|" &cinfo3 & "|" &cinfo4 & "|" & cinfo5 & "|" &cinfo6 & "|" &cinfo7 & "|" &cinfo8 & "|" &cinfo9 "|" &cinfo10
textfile.WriteLine(datiform)


%>

pensavo bastasse usare &vbCrLfalla fine ma non va...
forse va messo, ma non lì? o forse è un altro il comando?

grazie dell'ajuto.

[Dirk Pitt]

Prova così:

Set fso = Server.CreateObject("Scripting.FileSystemObject") 
Set textfile = fso.OpenTextFile(Server.MapPath("iscritti.txt"), 2)
riga_divisione = "------------------------------" 
cinfo1 = request.form("info1") 
cinfo2 = request.form("info2") 
cinfo2bis = request.form("info2bis") 
cemail = request.form("email") 
cinfo4 = request.form("info4") 
cinfo5 = request.form("info5") 
cinfo6 = request.form("info6") 
cinfo7 = request.form("info7") 
cinfo8 = request.form("info8") 
cinfo9 = request.form("info9") 
cinfo10 = request.form("info10")

textfile.WriteLine(cinfo1)
textfile.WriteLine(cinfo2)
textfile.WriteLine(cinfo2bis)
... e così per tute le variabili.

textfile.WriteLine(riga_divisione)

La riga_divisione ti serve per dividere un inserimento dall'altro.

[Unideanet]

veramente io volevo andar a capo ogni riga NON ogni campo, ma ho capito perché avevo il CHMOD su 2 anziché su 8.

Ora funziona, nel senso che ogni riga nuova la scrive sotto (non sopra a quella che c'era prima) PERò ho 2 problemi contigui:

1° il file txt. si trova in una cartella speciale chmod 777, io vorrei che il programma ASP che scrive nel txt stesse in un'altra directory (la principale) MA ahimé da lì non funziona, funziona solo se lo metto nella stessa directory del file txt su cui deve scrivere (sia che usi PATH sia che gli dia il percorso esatto). Perché?

2° in ogni caso come inpedire a qualcuno che mi visiona il codice di vedere dove scarica i dati il modulo asp e così -volendo- basa che indirizza il suo browser sul file .txt e si vede tutti i dati da me raccolti?

grazie per l'aJuto.
:master:

[Dirk Pitt]

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(Server.MapPath("/tua_cartella/sottocartella/file.txt"))

In questo modo vedi che il file asp che crea il file .txt sta es. nella root e va a creare il file txt nella cartella tua_cartella/sottocartella.

Fai lo stesso se invece il file lo devi solo aprire ed aggiungere delle righe.
Dovrebbe funzionare.

Quanto al file "visibile" a chiunque, anzichè usare l'estensione .txt, usa es. l'estensione .inc, normalmente non visibile da browser.