%
Option Explicit
dim rs, conn, query
%>
<%
if len(request.querystring("delete")) > 0 then
query = "DELETE * FROM tblGuest WHERE guestID=" & request.querystring("delete") & ";"
Set rs = conn.execute(query)
end if
if len(request.querystring("reviewed")) > 0 then
query = "UPDATE tblGuest set reviewed=true WHERE guestID=" & request.querystring("reviewed") & ";"
Set rs = conn.execute(query)
end if
if request.cookies("loggedin") = "True" then
query = "Select * from tblGuest ORDER BY dateSigned desc"
else
query = "Select * from tblGuest WHERE reviewed=true ORDER BY dateSigned desc"
end if
Set rs = conn.execute(query)
%>
Heidi Scarfone
I invite you to sign my guest book and share your thoughts about any of the drawings that you have seen on my site. I would love to hear about any of the memories that the drawings stirred in your heart.