<% if request.QueryString("mode") = "fail" then%> Please re-enter your message <%else%>Leave me a little present <%end if%>

Name
Message
Security Question	What world is this? www. world
The Security question is to stop all the spam. Sorry!

Other Messages...

<% ' MyFile = "e:\domains\unclebobworld.co.uk\user\htdocs\cgi-bin\guestbook.txt" Mypath = server.mappath("cgi-bin") myFile = Mypath&"\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 %>