定期的なイベントを複数のサイトのリストに追加する

[アーティクル]
06/15/2015

ここでは、定期的なイベントを会議ワークスペースサイトと共にサブサイトのコレクション内のすべてのサイトのイベントリストに追加する方法について説明します。

定期的なイベントを会議ワークスペースサイトと共にサブサイトのコレクション内のすべてのサイトのイベントリストに追加するには

「[方法] コンソールアプリケーションを作成する」での説明に従って、Microsoft Visual Studio 2005 でコンソールアプリケーションを作成します。
.cs ファイルまたは .vb ファイルの先頭に、以下のような Microsoft.SharePoint 名前空間および Microsoft.SharePoint.Meetings 名前空間に対する using ディレクティブまたは Imports ディレクティブを追加します。
```
Imports Microsoft.SharePoint
Imports Microsoft.SharePoint.Meetings
```
```
using Microsoft.SharePoint;
using Microsoft.SharePoint.Meetings;
```

SPSite コンストラクタを使用して、指定したサイトコレクションをインスタンス化します。この例では、SPSite クラスの AllWebs プロパティに対してインデクサを使用して特定のサイトを取得し、SPWeb クラスの Webs プロパティに対してインデクサを使用して、そのサイトの下のサブサイトを取得しています。以下のように、foreach ループを設定し、すべてのサブサイトについて反復処理し、各サイトのイベントリストと各イベントリスト内のリストアイテムのコレクションを取得します。

Dim evtTitle As String = Console.ReadLine()

Dim siteCollection As New SPSite("Absolute_Url")
Dim site As SPWeb = siteCollection.AllWebs("Site_Name")
Dim subSites As SPWebCollection = site.Webs
Dim subSite As SPWeb

For Each subSite In subSites

    Dim list As SPList = subSite.Lists("Events")
    Dim listItems As SPListItemCollection = list.Items

string evtTitle = Console.ReadLine();

SPSite siteCollection = new SPSite("Absolute_Url");
SPWeb site = siteCollection.AllWebs["Site_Name"];
SPWebCollection subSites = site.Webs;

foreach (SPWeb subSite in subSites)
{
    SPList list = subSite.Lists["Events"];
    SPListItemCollection listItems = list.Items;

リストアイテムを作成します。この例では、SPListItemCollection クラスの Add メソッドを使用して初期化されていないリストアイテムを作成し、インデクサを使用して新しいアイテムのさまざまなプロパティを設定して、さらに Update メソッドを使用してアイテムの作成を完了しています。

Dim recEvent As SPListItem = listItems.Add()

Dim recdata As String 
        = "<recurrence><rule><firstDayOfWeek>su</firstDayOfWeek>" _ 
    & "<repeat><daily dayFrequency='1' /></repeat>" _ 
    & "<repeatInstances>5</repeatInstances></rule></recurrence>"

recEvent("Title") = evtTitle
recEvent("RecurrenceData") = recdata
recEvent("EventType") = 1
recEvent("EventDate") = New DateTime(2003, 8, 15, 8, 0, 0)
recEvent("EndDate") = New DateTime(2003, 9, 25, 9, 0, 0)
recEvent("UID") = Guid.NewGuid()
recEvent("TimeZone") = 13
recEvent("Recurrence") = - 1
recEvent("XMLTZone") 
        = "<timeZoneRule><standardBias>480</standardBias>" _
    & "<additionalDaylightBias>-60</additionalDaylightBias>" _
    & "<standardDate><transitionRule  month='10' 
        day='su' weekdayOfMonth='last' />" _
    & "<transitionTime>2:0:0</transitionTime></standardDate>" _
    & "<daylightDate><transitionRule  month='4' 
        day='su' weekdayOfMonth='first' />" _
    & "<transitionTime>2:0:0</transitionTime>
        </daylightDate></timeZoneRule>"

recEvent.Update()

    SPListItem recEvent = listItems.Add();

    string recData = "<recurrence><rule>
            <firstDayOfWeek>su</firstDayOfWeek>" +
        "<repeat><daily dayFrequency='1' /></repeat>" +
        "<repeatInstances>5</repeatInstances></rule></recurrence>";

    recEvent["Title"] = evtTitle;
    recEvent["RecurrenceData"] = recData;
    recEvent["EventType"] = 1;
    recEvent["EventDate"] = new DateTime(2003,8,15,8,0,0);
    recEvent["EndDate"] = new DateTime(2003,9,25,9,0,0);
    recEvent["UID"] = System.Guid.NewGuid();
    recEvent["TimeZone"] = 13;
    recEvent["Recurrence"] = -1;
    recEvent["XMLTZone"] = "<timeZoneRule>
            <standardBias>480</standardBias>" +
        "<additionalDaylightBias>-60</additionalDaylightBias>" +
        "<standardDate><transitionRule  month='10' 
            day='su' weekdayOfMonth='last' />" +
        "<transitionTime>2:0:0</transitionTime></standardDate>" +
        "<daylightDate><transitionRule  month='4' 
            day='su' weekdayOfMonth='first' />" +
        "<transitionTime>2:0:0</transitionTime>
            </daylightDate></timeZoneRule>";

    recEvent.Update();

recData 変数には 5 日間毎日行われる定期的なイベントのプロパティを指定する XML フラグメントを格納し、XML タイムゾーンインデクサで現在のサイトのタイムゾーン情報を割り当てます。定期的なイベントを定義する XML とタイムゾーン情報を指定する XML は、コンテンツデータベースの UserData テーブルの ntext3 列および ntext4 列に格納されます。

以下の表に、使用可能なさまざまな種類の定期的なイベントの例を示します。

説明	例
指定された終了日まで隔日	`<recurrence><rule> <firstDayOfWeek>su</firstDayOfWeek> <repeat><daily dayFrequency='2' /></repeat> <windowEnd>2003-09- 20T09:00:00Z</windowEnd> </rule></recurrence>`
毎週月曜日	`<recurrence><rule> <firstDayOfWeek>su</firstDayOfWeek> <repeat><weekly mo='TRUE' weekFrequency='1' /></repeat> <repeatForever>FALSE</repeatForever> </rule></recurrence>`
隔月の 3 日を 5 回	`<recurrence><rule> <firstDayOfWeek>su</firstDayOfWeek> <repeat><monthly monthFrequency='2' day='3' /></repeat> <repeatInstances>5</repeatInstances> </rule></recurrence>`
指定された終了日まで毎月第 1 火曜日	`<recurrence><rule> <firstDayOfWeek>su</firstDayOfWeek> <repeat> <monthlyByDay tu='TRUE' weekdayOfMonth='first' monthFrequency='1' /> </repeat> <windowEnd>2003-08- 02T10:00:00Z</windowEnd> </rule></recurrence>`
指定された終了日まで毎年 9 月 20 日	`<recurrence><rule> <firstDayOfWeek>su</firstDayOfWeek> <repeat><yearly yearFrequency='1' month='9' day='20' /></repeat> <windowEnd>2007-09- 20T07:00:00Z</windowEnd> </rule></recurrence>`

会議ワークスペースサイトを定期的なイベントに追加するには、SPWebCollection クラスの Add メソッドのいずれか、および SPMeeting クラスの LinkWithEvent メソッドを使用します。

    Dim mwsSites As SPWebCollection = subSite.Webs

    Dim path As String = recEvent("Title").ToString()

    Dim newSite As SPWeb = mwsSites.Add(path, "Workspace_Name", _
        "Description", Convert.ToUInt32(1033), "MPS#0", False, 
        False)

    Dim mwsSite As SPMeeting 
        = SPMeeting.GetMeetingInformation(newSite)

    Dim guid As String = list.ID.ToString()
    Dim id As Integer = recEvent.ID

    Try

        mwsSite.LinkWithEvent(subSite, guid, id, "WorkspaceLink", 
            "Workspace")

    Catch ex As System.Exception

        Console.WriteLine(ex.Message)

    End Try

Next subSite

    SPWebCollection mwsSites = subSite.Webs;

    string path = recEvent["Title"].ToString();

    SPWeb newSite = mwsSites.Add(path, "Workspace_Name", 
        "Description", 1033, "MPS#0", false, false);

    SPMeeting mwsSite = SPMeeting.GetMeetingInformation(newSite);

    string guid = list.ID.ToString();
    int id = recEvent.ID;

    try
    {
        mwsSite.LinkWithEvent(subSite, guid, id, "WorkspaceLink", 
            "Workspace");
    }

    catch (System.Exception ex)
    {
        Console.WriteLine(ex.Message);
    }
}

会議ワークスペースサイトが作成された後、GetMeetingInformation メソッドは、作成されたサイトを表す SPMeeting オブジェクトを返します。

F5 キーを押してコンソールアプリケーションを起動します。
コマンドプロンプトで会議ワークスペースサイトの名前を入力し、Enter キーを押すと、定期的なイベントが会議ワークスペースサイトと共にサイトの下のすべてのサブサイトのイベントリストに追加されます。

次の方法で共有

定期的なイベントを複数のサイトのリストに追加する

定期的なイベントを会議ワークスペースサイトと共にサブサイトのコレクション内のすべてのサイトのイベントリストに追加するには

その他のリソース

次の方法で共有

定期的なイベントを複数のサイトのリストに追加する

定期的なイベントを会議ワークスペース サイトと共にサブサイトのコレクション内のすべてのサイトのイベント リストに追加するには

その他のリソース

定期的なイベントを会議ワークスペースサイトと共にサブサイトのコレクション内のすべてのサイトのイベントリストに追加するには