StorageItem オブジェクト (Outlook)
常に隠しアイテムとして親フォルダーに保存され、Outlook ソリューションの個人用データを格納する MAPI のメッセージ オブジェクトです。
注釈
StorageItem オブジェクトは、アカウントと共に移動し、オンラインまたはオフラインで使用できるように、フォルダー レベルで格納されます。
Outlook オブジェクト モデルには、StorageItem オブジェクト用のコレクション オブジェクトは用意されていません。 ただし、Folder.GetTable を使用すると、TableContents パラメーターを olHiddenItems として指定するときに、フォルダー内のすべての非表示項目を含むテーブルを取得できます。 データの秘密保持がきわめて重要な場合は、データを暗号化してから保存します。
StorageItem オブジェクトを取得すると、ソリューション データを保存するのには、次を行うことができます。
アイテムに保存用の添付ファイルを追加します。
Body など、アイテムの明示的な組み込みのプロパティを使用してカスタム データを保存します。
UserProperties.Add メソッドを使用してアイテムにカスタム プロパティを追加します。 この場合、UserProperties.Add メソッドの省略可能な AddToFolderFields 引数と DisplayFormat 引数は無視されることに注意してください。
PropertyAccessor オブジェクトを使用して、カスタム プロパティを取得または設定します。
新しい StorageItem のデフォルトのメッセージ クラスは、IPM の です。ストレージ ・ です。 バージョンの Microsoft Office Outlook 2007 より前の Outlook で非表示のメッセージとしての StorageItem が存在していた場合、メッセージ クラスは変更されません。 メッセージ クラスの変更を防止するために、 StorageItem は、明示的な MessageClass プロパティを公開しません。
StorageItem オブジェクトを使ったソリューション データの保存の詳細については、「ソリューションのデータを保存する」を参照してください。
例
Visual Basic for Applications では、次のコード サンプルでは、 StorageItem オブジェクトを使用して個人用のソリューション データを格納する方法を示します。 受信トレイ フォルダー内の StorageItem オブジェクトのカスタム プロパティにデータを保存します。 次の手順を説明します。
このコード サンプルでは 、Folder.GetStorage を呼び出して、受信トレイに "My Private Storage" という件名の既存の StorageItem オブジェクトを取得します。 既にその件名の StorageItem が存在しない場合、 GetStorage は、その件名の StorageItem オブジェクトを作成します。
StorageItem を新規に作成された場合、コード サンプルは、オブジェクトのカスタム プロパティ「注文数」を作成します。 「注文数」が受信トレイに非表示のアイテムのプロパティであることに注意します。
コード サンプルは、「注文番号」に値を代入し、 StorageItem オブジェクトを保存します。
Sub AssignStorageData()
Dim oInbox As Outlook.Folder
Dim myStorage As Outlook.StorageItem
Set oInbox = Application.Session.GetDefaultFolder(olFolderInbox)
' Get an existing instance of StorageItem, or create new if it doesn't exist
Set myStorage = oInbox.GetStorage("My Private Storage", olIdentifyBySubject)
' If StorageItem is new, add a custom property for Order Number
If myStorage.Size = 0 Then
myStorage.UserProperties.Add "Order Number", olNumber
End If
' Assign a value to the custom property
myStorage.UserProperties("Order Number").Value = 100
myStorage.Save
End Sub
メソッド
| 名前 |
|---|
| Delete |
| Save |
プロパティ
| 名前 |
|---|
| アプリケーション |
| 添付ファイル |
| Body |
| クラス |
| CreationTime |
| Creator |
| EntryID |
| LastModificationTime |
| Parent |
| PropertyAccessor |
| Session |
| Size |
| 件名 |
| UserProperties |
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。