Outlook) (Conversation.GetTable 方法
會傳回 Table 物件，其中包含代表交談中所有專案的資料列。
語法
expression。 GetTable
表達 代表'Conversation' 物件的變數。
傳回值
包含代表交談中所有項目之列的 Table 物件。
註解
GetTable 方法會傳回 Table，其中以交談的所有項目做為列。 欄的預設集顯示於下表中。
| 欄 | 屬性 |
|---|---|
| 1 | EntryID |
| 2 | 主旨 |
| 3 | CreationTime |
| 4 | LastModificationTime |
| 5 | MessageClass |
根據預設，表中的列是依項目的 ConversationIndex 屬性排序。
若要修改預設資料行集，請使用Columns集合物件的Add、Remove或RemoveAll方法。
由這個 GetTable 方法傳回的 Table 物件不包括已移至 [刪除的郵件] 資料夾的交談中項目。
範例
下列 Visual Basic for Applications (VBA) 程式碼範例 DemoConversationTable 假設有一個在偵測器中開啟的訊息項目。 DemoConversationTable 會根據此訊息項目取得 Conversation 物件， 並呼叫 GetTable 方法來取得所有交談專案的 Table 。 若要取得交談中每個可跨越存放區之專案的特定資訊， DemoConversationTable 請將存放區專案識別碼屬性 https://schemas.microsoft.com/mapi/proptag/0x0FFB0102 新增為數據表中的資料行。 當 DemoConversationTable 列舉資料表中資料列) 所代表的每個專案 (時，它會使用對應至該專案的存放區專案 ID 屬性來呼叫NameSpace物件的GetItemFromID方法來取得專案物件。 然後，此範例會顯示該專案的主旨和附件數目。
注意事項
只有在 Outlook 帳戶連線到至少執行 Microsoft Exchange Server 2010 的Microsoft Exchange Server，或 Outlook 在 2007 Microsoft Exchange Server以快取模式執行時，列舉交談才能運作。
Sub DemoConversationTable()
Dim oConv As Outlook.Conversation
Dim oTable As Outlook.Table
Dim oRow As Outlook.Row
Dim oMail As Outlook.MailItem
Dim oItem As Outlook.MailItem
Const PR_STORE_ENTRYID As String = _
"https://schemas.microsoft.com/mapi/proptag/0x0FFB0102"
On Error Resume Next
' Obtain the current item for the active inspector.
Set oMail = Application.ActiveInspector.CurrentItem
If Not (oMail Is Nothing) Then
' Obtain the Conversation object.
Set oConv = oMail.GetConversation
If Not (oConv Is Nothing) Then
Set oTable = oConv.GetTable
oTable.Columns.Add (PR_STORE_ENTRYID)
Do Until oTable.EndOfTable
Set oRow = oTable.GetNextRow
' Use EntryID and StoreID to open the item.
Set oItem = Application.session.GetItemFromID( _
oRow("EntryID"), _
oRow.BinaryToString(PR_STORE_ENTRYID))
Debug.Print oItem.Subject, _
"Attachments.Count=" & oItem.Attachments.count
Loop
End If
End If
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。