wyww_info.gif (3977 bytes)

<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "wyinfo" sql = "SELECT Guestbook.Name, Guestbook.[EMail Address], Guestbook.Date, Guestbook.Comments, Guestbook.Location, Guestbook.Date From GuestBOOK" Set RS = conn.execute(sql) %>

Recent Guestbook entries through <%=Date%> are shown below. You can also add your entry to the guestbook.

<% do while not rs.eof %>

Name: <%=RS("NAME")%>
E-Mail Address: <%=RS("email address")%>
City, State: <%=RS("location")%>
Date: <%=RS("Date")%>
Comments: <%=RS("comments")%> <% Rs.movenext loop %>