<%=strTitle%>
Now you can enjoy the magic of Eola Events once again! Just click the event title link and see the pictures of event.
<% dim oConn dim rs OpenConnection oConn Session("LoginValidated") = "" sql = "select * from EventPictureMaster where Active = 1 order by CreationDate Desc" Set rs = oConn.Execute(sql) if not rs.eof then %> <% while NOT rs.EOF If rs("password") = "" then strHref = "PictureHome.asp?passwordrequired=false&EventId=" & rs("EventId") Else strHref = "PicturePassword.asp?EventId=" & rs("EventId") End If %> <% rs.movenext wend %>
<%=rs("EventTitle")%>
<%=rs("EventDescription")%>

<%End if%>