This is my guestbook. Use this form to submit your greeting:


<% MyFile = "c:\guestbook.txt" 'Opens the guestbook file if it exists Set MyFileObj=Server.CreateObject("Scripting.FileSystemObject") IF MyFileObj.FileExists(MyFile) THEN Set MyTextFile=MyFileObj.OpenTextFile(MyFile) 'Reads a line, and outputs it WHILE NOT MyTextFile.AtEndOfStream %>
<%=MyTextFile.ReadLine%> <% WEND 'Closes the textfile MyTextFile.Close END IF' Does file exist %>