Outlook) (StorageItem 物件
MAPI 中的郵件物件，此物件永遠會在上層資料夾中儲存成隱藏項目並存放 Outlook 方案的私人資料。
註解
StorageItem 物件會儲存在資料夾層級，讓它可以隨著帳號漫遊並且可在連線或離線狀態下使用。
Outlook 物件模型並未提供 StorageItem 物件的任何集合物件。 不過，當您將TableContents參數指定為olHiddenItems時，您可以使用Folder.GetTable來取得含有Folder中所有隱藏專案的 Table。 如果保持資料私密性對您很重要，就應該先加密資料，然後再儲存資料。
一旦您取得了 StorageItem 物件，就可以進行下列步驟來儲存方案資料：
將附件加入至項目以便儲存。
使用專案的明確內建屬性，例如 Body 來儲存自訂資料。
使用 UserProperties.Add 方法，將自訂屬性新增至專案。 在此情況下請注意，UserProperties.Add 方法的選用 AddToFolderFields 及 DisplayFormat 引數將會遭到略過。
使用 PropertyAccessor 物件來取得或設定自訂屬性。
新 StorageItem 的預設郵件類別為 IPM.Storage。 如果 StorageItem 存在成為 Microsoft Office Outlook 2007 之前 Outlook 版本中的隱藏郵件，此郵件類別將會維持不變。 為了防止修改郵件類別，StorageItem 不會公開明確的 MessageClass 屬性。
如需使用 StorageItem 物件來儲存方案資料的詳細資訊，請參閱儲存方案的資料。
範例
下列 Visual Basic for Applications 程式碼範例將示範如何使用 StorageItem 物件來儲存私人方案資料。 它會將資料儲存在 [收件匣] 資料夾之 StorageItem 物件的自訂屬性中。 下面將描述這些步驟。
程式碼範例會呼叫 Folder.GetStorage 來取得在 [收件匣] 中主旨為 「My Private Storage」 的現有 StorageItem 物件。 如果具有該主旨的 StorageItem 不存在，GetStorage 就會建立具有該主旨的 StorageItem 物件。
如果 StorageItem 是新建立的，此程式碼範例就會為物件建立自訂屬性 "Order Number"。 請注意，"Order Number" 是 [收件匣] 中隱藏項目的屬性。
程式碼範例接著會將值指派給 「Order Number」，並儲存 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 |
屬性
| 名稱 |
|---|
| Application |
| Attachments |
| Body |
| Class |
| CreationTime |
| Creator |
| EntryID |
| LastModificationTime |
| Parent |
| PropertyAccessor |
| Session |
| 大小 |
| Subject |
| UserProperties |
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。