サーバー側の繰り返し予定を削除

Imports Infragistics.WebUI.Shared
Imports Infragistics.WebUI.WebSchedule
...
' 今日発生する予定を見つけ出すために、GetActivitiesForDate メソッド
' を使用します。
Me.WebScheduleInfo1.DataBind()
Dim activities As ActivitiesSubsetCollection = _
  Me.WebScheduleInfo1.GetActivitiesForDate(Me.WebScheduleInfo1.ActiveResource, _
  New SmartDate(DateTime.Now))
Dim appointment As Appointment = CType(activities(0), Appointment)
' 繰り返しのルート アクティビティを取得します。
appointment = CType(appointment.Recurrence.RootActivity, Appointment)
' 削除している繰り返し予定。
appointment.Recurrence.MaxOccurrences = 5
' Key を空の文字列に設定することによって繰り返しを削除します。
appointment.RecurrenceKey = ""
' Activities コレクションを更新するために、DataBind を再度呼び出す必要があります。
' WebScheduleInfo は、一度呼び出した後では自動的に
' 呼び出しません。
Me.WebScheduleInfo1.DataBind()

using Infragistics.WebUI.Shared;
using Infragistics.WebUI.WebSchedule;
...
// 以下の using ディレクティブを使用すると、完全に記述した名前を
// 毎回入力する必要がありません。
using Infragistics.WebUI;
using Infragistics.WebUI.WebSchedule;
// 今日発生する予定を見つけ出すために、GetActivitiesForDate メソッド
// を使用します。
this.WebScheduleInfo1.DataBind();
ActivitiesSubsetCollection activities =
  this.WebScheduleInfo1.GetActivitiesForDate(this.WebScheduleInfo1.ActiveResource,
  new SmartDate(DateTime.Now));
Appointment appointment = (Appointment)activities[0];
// 繰り返しのルート アクティビティを取得します。
appointment = (Appointment)appointment.Recurrence.RootActivity;
// 削除している繰り返し予定。
appointment.Recurrence.MaxOccurrences = 5;
// Key を空の文字列に設定することによって繰り返しを削除します。
appointment.RecurrenceKey = "";
// Activities コレクションを更新するために、DataBind を再度呼び出す必要があります。
// WebScheduleInfo は、一度呼び出した後では自動的に
// 呼び出しません。
this.WebScheduleInfo1.DataBind();