<%while (! Table.eof) { %>
<%=Table.FindField("event_name").DisplayText %> <%=Table.FindField('event_description').AsString %> >
<% =Table.FindField("event_date").DisplayText %> <% =Table.FindField("event_time").DisplayText %>
<%=Table.FindField("ticket_price").DisplayText %>
<% Table.next; } %>