<% strSection = "resources" strPageTitle = "Calendar" strSub = "resources" %> <% 'Dim oRS, occID occID = Request("OccID") set oRS = GetEvent(occID) if not ors.eof then %> <%if len(oRS("LocName")) <> 0 then%> <%end if%>
<%=oRS("EventName")%>

Date:

<%=FormatDate(oRS("OccStartTime"))%>    (Event ranges from <%=FormatDate(oRS("MinDate"))%> to <%=FormatDate(oRS("MaxDate"))%>)

Time:

<%=FormatTime(oRS("OccStartTime"))%> - <%=FormatTime(oRS("OccEndTime"))%>

Department:

<%=oRS("DepartmentName")%>

Contact:

<%=oRS("OtherContact")%>
"><%=oRS("OtherContactEmail")%>

Location:

<%=oRS("LocName")%>
<%=oRS("LocAddress")%>
<%=oRS("LocCity")%>, <%=oRS("LocState")%>  <%=oRS("LocZip")%>
(&city=<%=oRS("LocCity")%>&state=<%=oRS("LocState")%>&zip=<%=oRS("LocZip")%>&country=us&zoom=8" target="_new">View the map for this location)

Description:

<%=oRS("Description")%>
<% else %>

Invalid Event ID
<% end if set oRS = Nothing %>