Utilizzo questo write.asp per compilare un file di testo che si chiama guest.txt
<%
MyFile = Server.MapPath("/public")&"/guest.txt"
Response.Write (MyFile)
Set MyFileObj=Server.CreateObject("Scripting.FileSyste mObject")
Set MyOutStream=MyFileObj.OpenTextFile(MyFile, 8, TRUE)
New_line = Request.Form("new_line")
New_line = Server.HTMLEncode(New_line)
'Adds the time and date it was posted
New_line = "Posted: " & NOW & "
" & New_line
MyOutStream.WriteLine(New_line)
MyOutStream.Close
Response.Redirect "http://www.gimeil.com/default.asp"
%>
E' possibile fare in modo che write.asp cancelli le righe più vecchie del file di testo (diciamo, che quando questo supera le 5 righe, l'ultima venga cancellata, in modo che non superi mai una certa dimensione le 5 righe).
Grazie!

Rispondi quotando