Newsgroup: it.comp.www.asp
Titolo: [?] appendere al file e non sovrascrivere

Salve a tutti. Premetto che sono poco esperto in qunato ho iniziato da poco.
Sto realizzando un piccolo guestbook in asp ed ho un problema: lo script
ogni volta mi sovrascrive il txt dei messaggi io invece vorrei che il
messaggio venisse "appeso" in testa al file. Come posso fare?
Il codice che uso al momento è il seguente:
Nome=request.form("Nome")
email=request.form("email")
messaggio=request.form("messaggio")
if nome="" then nome="Anonimo"
file="c:\inetpub\wwwroot\883network\city\bacheca\messaggi.txt"
Set a=CreateObject("Scripting.FileSystemObject")
Set b=a.OpenTextFile(file)
Set b=a.CreateTextFile(file, True)
b.WriteLine("<font face=""verdana"" size=""2"">")
b.WriteLine("Nome: " & Nome & "<br>")
b.WriteLine("E-mail: " & email & "<br>")
b.WriteLine("Messaggio: " & messaggio)
b.WriteLine("</font>")
b.WriteLine("<hr>")
b.Close
(no ho molta fantasia ed ho messo a e b :-)
--
=> Fabio883 <=
fab...@net-one.it
ICQ UIN: 5320334
Home Page: 
http://i.am/fabio883
**************************************
SE LA SCUOLA FOSSE UN FILM:
La presidenza:   LA CASA DI DRACULA
Il piu' bravo della classe:   L'UOMO CHE SAPEVA TROPPO
I giudizi negativi:   TUTTE SPORCHE CALUNNIE
I giudizi positivi:   LA PURA VERITA'
**************************************
SignMail v1.0 Beta by Fabio883

Non sono sicuro, ma prova ad omettere questa istruzione.
Set b=a.CreateTextFile(file, True)
pace Beddy

Devi aprire il file con questi parametri:
Set FileObject=CreateObject("Scripting.FileSystemObject")
Set InStream=FileObject.OpenTextFile(TuoFile,8,true)
Ciao
Liga97
E-Mail: 
lig...@alo.it
ICQ: 11362849

 Set b=a.CreateTextFile(file, True)
c'è già :-)
Comunque da quanto ho capito se faccio file,8,true lo appende ma alla fine,
e a me serve all'inizio :-(

E allora ti devi leggere le righe all'inizio e poi riaprire il file in
scrittura (e non in append) e scrivere prima le righe del vecchio file
e poi quelle nuove!
Purtroppo penso che sia l'unico metodo.........sigh ;)


 wrote in message
372dc1f4...@news.interbusiness.it...


 c'è già :-)
omettere = non mettere
Appunto toglila.
pace Beddy

 Set InStream=FileObject.OpenTextFile(TuoFile,8,true)
Ho capito ma il suo proble e' che dopo avere aperto il file lo ricrea con
l'istruzione
Set InStream=a.CreateTextFile(TuoFile, True)
E questa istruzione e' da seccare
pace Beddy

consumare i suoi elettroni :-)
Potresti scrivere i dati nuovi su un file nuovo e poi fare un comando di
copy sommando i due e ricoprendo l'origine, cioe':
copy filenuovo + filevecchio filevecchio
Il comando copy non impegna troppo il server pero' non so se esiste un
comando asp per effettuare comandi di copia (se fosse scritto in cgi, tipo
un programma in vb saprei come fare)
Giorgio Leonardi

 wrote in message
7gf891$tnl$1...@waltz.mi.linux.it...



^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v
Moderatore di it.comp.www.asp
Gruppo di supporto: 
http://www.asp-it.com
^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v
iPoint Network 
http://www.ipoint2000.net
 Servizi, siti ed altro!
Personalizza le tue notizie con 
http://www.ipoint2000.net/now

Eseguire comandi dos......
non va bene per la sicurezza.
Se uno eseguisse format c:
pace Beddy