DateTime.DateFormat = "yyyy-MM-dd"
Log("today is: " & DateTime.Date(DateTime.Now))
calendar.Initialize(page, "calendar1", DateTime.Date(DateTime.Now), ABM.FIRSTDAYOFWEEK_MONDAY, "en", ABM.CALENDAR_DEFAULTVIEW_MONTH, "calendartheme")
calendar.Editable = True
calendar.UseTheme("calendartheme")