Conversation.GetTable-Methode (Outlook)
Gibt ein Table -Objekt zurück, das Zeilen enthält, die alle Elemente in der Unterhaltung darstellen.
Syntax
Ausdruck. GetTable
Ausdruck Eine Variable, die ein Conversation-Objekt darstellt.
Rückgabewert
Ein Table -Objekt, das Zeilen enthält, die alle Elemente in der Unterhaltung darstellen.
Hinweise
Die GetTable -Methode gibt eine Tabelle, die alle Elemente der Unterhaltung als Zeilen aufweist. In der folgenden Tabelle wird die Standardgruppe von Spalten angezeigt.
| Spalte | Eigenschaft |
|---|---|
| 1 | EntryID |
| 2 | Subject |
| 3 | CreationTime |
| 4 | LastModificationTime |
| 5 | MessageClass |
Standardmäßig werden die Zeilen in der Tabelle nach der ConversationIndex -Eigenschaft der Elemente sortiert.
Verwenden Sie die Methoden Add, Remove oder RemoveAll des Columns -Auflistungsobjekts, um die Standardspaltensammlung zu ändern.
Das Table -Objekt, das von dieser GetTable -Methode zurückgegebene enthält keine Elemente in der Unterhaltung, die in den Ordner Gelöschte Elemente verschoben wurden.
Beispiel
Im folgenden codebeispiel DemoConversationTablefür Visual Basic for Applications (VBA) wird davon ausgegangen, dass ein E-Mail-Element in einem Inspektor geöffnet ist.
DemoConversationTable Ruft ein Conversation -Objekt basierend auf dieser e-Mail-Element, und ruft die GetTable -Methode zum Abrufen einer Tabelle aller Elemente der Unterhaltung. Um spezifische Informationen für jedes Element in der Unterhaltung abzurufen, die über Speicher umfassen kann, fügt DemoConversationTable Store Eintrag ID-Eigenschaft, https://schemas.microsoft.com/mapi/proptag/0x0FFB0102, als Spalte der Tabelle.
DemoConversationTable jedes Element (dargestellt durch eine Zeile) in der Tabelle listet, wird die Store Eintrags-ID-Eigenschaft, die die GetItemFromID -Methode des NameSpace -Objekts zum Abrufen der Element-Objekts aufrufen, dass das Element entspricht. Das Beispiel zeigt dann den Betreff und die Anzahl der Anlagen für dieses Element.
Hinweis
[!HINWEIS] Die Aufzählung der Unterhaltung funktioniert nur, wenn das Outlook-Konto mit einem Servercomputer mit Microsoft Exchange verbunden ist, der mindestens Microsoft Exchange Server 2010 ausführt, oder Outlook im Cache-Modus unter Microsoft Exchange Server 2007 ausgeführt wird.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.