<%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; } %>