<%@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 %> Melissa MacNeal - Guestbook
Melissa MacNeal
Click on the word or on the Wicked Kitty to go to that page

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 and let me know you stopped by.

Read Guestbook

First Name:
Last Name:
Email:
City:
State:
Country:
Comment:

View Guestbook

 <%do while NOT RS.EOF if RS("Comments") <> "" then%> <% end if RS.MoveNext Loop%>

<%=RS("comments")%>

<%=RS("firstname")%> <%=RS("lastname")%> from <%=RS("city")%>, <%=RS("state")%> <%=RS("country")%> on <%=RS("dateentered")%>

 

HOME  ||  BOOKS  ||   BIO  ||  NEW || UPCOMING ||  THE WICKED KITTY  || 
|| NEWSLETTERS || GUESTBOOK || EMAIL
NovelTalk.com
Designed and hosted
by NovelTalk.Com