|
|
|
<% path = server.mappath("news.txt") IF NOT Request.Form("NextLine")="" THEN Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject") Set MyTextFile=MyFileObject.OpenTextFile(path, 2, TRUE) MyTextFile.WriteLine(Request.Form("NextLine")) MyTextFile.Close END IF%>
|
|