ASP.NET Syntax <des:SpecialDates id="SpecialDates2" runat=server >
<TimeRowTokens>
<des:TokenDefinition TokenName="Activity" FormatString=""></des:TokenDefinition>
</TimeRowTokens>
</des:SpecialDates> Code in Page_Load (C#) // Performance reviews due to Sept 6, 2006
SpecialDates2.AddDate(new DateTime(2006, 9, 6), PeterBlum.DES.SelectableState.Selectable,
"", "Performance reviews due", PeterBlum.DES.AutoSortDuplicatesMode.Allow);
// Company event on Sept 9, 2006 with 4 time rows describing activities
PeterBlum.DES.SpecialSingleDate vSSD = SpecialDates2.AddDate(
new DateTime(2006, 9, 9), PeterBlum.DES.SelectableState.Selectable,
"End of summer bash. Bring your family and swimming trunks!",
"Company event", PeterBlum.DES.AutoSortDuplicatesMode.Allow);
vSSD.AddTimeRow(new TimeSpan(10, 0,0), "Activity", "Pool opens and drinks served");
vSSD.AddTimeRow(new TimeSpan(12, 0,0), "Activity", "Our own blues band performs");
vSSD.AddTimeRow(new TimeSpan(13, 0,0), "Activity", "Barbeque");
vSSD.AddTimeRow(new TimeSpan(21, 0,0), "Activity", "Fireworks");
// Holidays: Christmas, New years Day and Memorial Day (USA) which is the last monday of May
SpecialDates2.AddAnnualDate(12, 25, 2000, 2010,
PeterBlum.DES.SelectableState.Unselectable,
"Holiday", "Christmas", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "");
SpecialDates2.AddAnnualDate(1, 1, 2000, 2010,
PeterBlum.DES.SelectableState.Unselectable,
"Holiday", "New Years Day", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "");
SpecialDates2.AddAnnualDate(5, -1, DayOfWeek.Monday, 2000, 2010,
PeterBlum.DES.SelectableState.Unselectable,
"Holiday", "Memorial Day", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "");
// Sundays are closed
SpecialDates2.AddDayOfWeek(DayOfWeek.Sunday,
PeterBlum.DES.SelectableState.Unselectable,
"Closed", "Closed", "DES_SDUnselectable2", "DES_SDUnselectableOM2", ""); Code
in Page_Load (VB) ' Performance reviews due to Sept 6, 2006
SpecialDates2.AddDate(new DateTime(2006, 9, 6), PeterBlum.DES.SelectableState.Selectable, _
"", "Performance reviews due", PeterBlum.DES.AutoSortDuplicatesMode.Allow)
' Company event on Sept 9, 2006 with 4 time rows describing activities
Dim vSSD As PeterBlum.DES.SpecialSingleDate = SpecialDates2.AddDate( _
New DateTime(2006, 9, 9), PeterBlum.DES.SelectableState.Selectable, _
"End of summer bash. Bring your family and swimming trunks!", _
"Company event", PeterBlum.DES.AutoSortDuplicatesMode.Allow)
vSSD.AddTimeRow(new TimeSpan(10, 0,0), "Activity", "Pool opens and drinks served")
vSSD.AddTimeRow(new TimeSpan(12, 0,0), "Activity", "Our own blues band performs")
vSSD.AddTimeRow(new TimeSpan(13, 0,0), "Activity", "Barbeque")
vSSD.AddTimeRow(new TimeSpan(21, 0,0), "Activity", "Fireworks")
' Holidays: Christmas, New years Day and Memorial Day (USA) which is the last monday of May
SpecialDates2.AddAnnualDate(12, 25, 2000, 2010, _
PeterBlum.DES.SelectableState.Unselectable, _
"Holiday", "Christmas", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "")
SpecialDates2.AddAnnualDate(1, 1, 2000, 2010, _
PeterBlum.DES.SelectableState.Unselectable, _
"Holiday", "New Years Day", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "")
SpecialDates2.AddAnnualDate(5, -1, DayOfWeek.Monday, 2000, 2010, _
PeterBlum.DES.SelectableState.Unselectable, _
"Holiday", "Memorial Day", "DES_SDUnselectable1", "DES_SDUnselectableOM1", "")
' Sundays are closed
SpecialDates2.AddDayOfWeek(DayOfWeek.Sunday, _
PeterBlum.DES.SelectableState.Unselectable, _
"Closed", "Closed", "DES_SDUnselectable2", "DES_SDUnselectableOM2", "")
|