'// 処理結果AtomFeedより、各Entryをループして確認する
For Each oResultEntry As AtomEntry In oBatchResultFeed.Entries
Dim lbSuccess As Boolean = True
// 処理結果失敗判定
If oResultEntry.BatchData.Status.Code <> 200 _
AndAlso oResultEntry.BatchData.Status.Code <> 201 Then
lbSuccess = False
'// InsertやUpdateに失敗したEntryの場合の処理を記述。
End If
If lbSuccess Then
'// InsertやUpdateに成功したEntryの場合の処理を記述。
'// Insertを行った場合、登録したEntryIDが取得できます。
Dim lsResultEntyrID = oResultEntry.Id.Uri.ToString
'// 更新日時の取得もできます。
Dim ldResultUpdateDate = oResultEntry.Updated
End If
Next
.NETでGoogle Data APIを使う(Googleカレンダー登録編)
牧野 (2011年1月19日 23:23)
ソフトウエア開発部 / Google Apps / .NET
みなさん、こんにちは。
前回の「.NETでGoogle Data APIを使う(スケジュール予定情報登録編)」で、
登録するスケジュールをまとめたFeedオブジェクトの作成までできました。
今回はこのFeedオブジェクトを使ってGoogleカレンダーを更新します。
Googleカレンダーの更新のためには、前々回作成した、
Googleの個人認証を行ったServiceオブジェクト(oService)に対して処理を行います。
例ではoServiceのBatch関数に前回作成したoBatchFeed、
そして登録したいカレンダーのFeedURIを指定します。
Batch関数の戻り値には、oBatchFeed内の各Entry毎の処理結果が
AtomFeedの形で返されます。
この1行で、Googleカレンダーの更新が完了しています。
後は、処理結果AtomFeedを参照して、成功/失敗時の処理を行います。
'// 処理結果AtomFeedより、各Entryをループして確認する For Each oResultEntry As AtomEntry In oBatchResultFeed.Entries Dim lbSuccess As Boolean = True // 処理結果失敗判定 If oResultEntry.BatchData.Status.Code <> 200 _ AndAlso oResultEntry.BatchData.Status.Code <> 201 Then lbSuccess = False '// InsertやUpdateに失敗したEntryの場合の処理を記述。 End If If lbSuccess Then '// InsertやUpdateに成功したEntryの場合の処理を記述。 '// Insertを行った場合、登録したEntryIDが取得できます。 Dim lsResultEntyrID = oResultEntry.Id.Uri.ToString '// 更新日時の取得もできます。 Dim ldResultUpdateDate = oResultEntry.Updated End If Next処理結果失敗判定に使用しているStatusCodeの値は、 こちら(HTTP status codes)を参照してください。他のシステム、アプリケーション等との同期を行うのであれば、
成功時のEntryID、更新日時等を取得して保存しておけば良いですね。
今回で「.NETでGoogle Data APIを使う」の記事は終了です。
ありがとうございました。