select Start, End, Event, Details, month from events where (start >= #CDate#) order by Start, Event

#UCase(MonthAsString(CurMonth))# #DateFormat(CDate,"yyyy")#
#UCase(MonthAsString(CurMonth))# #DateFormat(Start,"yyyy")#
#DateFormat(Start,"d")#-#DateFormat(End,"d")#	#Event# -#Details#