<%@Language = "VBScript"%> <% 'This page will list all of the guestbook comments 'get from saveguestbook if error status = "" status = Request.Querystring("status") dim today today = date SQL = "SELECT * FROM Guestbook WHERE Approved = 'yes' ORDER BY DateEntered desc" Set RS = Conn.Execute(SQL) if err then Response.write "Query failed due to: " & err.description & "
" end if %> Phoebe Conn Guestbook  
News Books About Phoebe Backlist
Guestbook Newsletter Press Kit Contact Me

Phoebe's Guestbook

<%if status = "Remove" then%>

Your guestbook entry was not allowed.

<%elseif status = "OK" then%>

Thank you for signing our guestbook. Your entry will show up as soon as it is approved.

<%else%> <%end if%>

Please sign my guestbook using the form below. To read my guestbook, click here.

First Name:
Last Name:
E-Mail:
City: , State:
Country:

Comments:
 

Please enter the image values to confirm this entry. Capitalization does matter.

Guestbook <% if NOT RS.EOF then%>

<%do while NOT RS.EOF%> <%RS.MoveNext Loop%>
<%=RS("comments")%>
From <%=RS("firstname")%> <%=RS("lastname")%> of <%=RS("city")%>, <%=RS("state")%>, <%=RS("country")%> on <%=RS("dateentered")%>
<%else%> There are no guestbook entries at this time. <%end if%>
 
NEWS  ||  BOOKS  ||  ABOUT ME ||  BACKLIST  ||  GUESTBOOK  ||  NEWSLETTER||  PRESS KIT  ||  CONTACT ME

This website designed and maintained by NovelTalk.
All Rights Reserved. © 2005-6 Phoebe Conn
For problems, contact the webmaster.
Designed & Hosted by