Recipient.Type-Eigenschaft (Outlook)

Artikel
04/07/2023

Gibt einen Wert vom Typ Long zurück (oder legt diesen fest), der den aktuellen Empfängertyp darstellt. Lese-/Schreibzugriff.

Syntax

Ausdruck. Typ

Ausdruck Eine Variable, die ein Recipient-Objekt darstellt.

Hinweise

In Abhängigkeit vom Empfängertyp wird durch diese Eigenschaft ein Long-Wert zurückgegeben oder festgelegt, der die numerische Entsprechung einer der folgenden Konstanten darstellt:

JournalItem -Empfänger: die OlJournalRecipientType -Konstante olAssociatedContact.
MailItem -Empfänger: eine der folgenden OlMailRecipientType -Konstanten: olBCC, olCC, olOriginator oder olTo.
MeetingItem -Empfänger: eine der folgenden OlMeetingRecipientType -Konstanten: olOptional, olOrganizer, olRequired oder olResource.
TaskItem -Empfänger: eine der folgenden OlTaskRecipientType -Konstanten: olFinalStatus oder olUpdate.

Diese Eigenschaft gibt möglicherweise nicht immer den geeigneten Empfängertyp für einen Konferenzraum zurück. Beispielsweise kann ein Konferenzraum in einer Besprechungsanfrage als erforderlicher Empfänger angegeben sein. In diesem Fall gibt diese Eigenschaft für den Konferenzraum nicht olResource zurück.

Um zuverlässig zu bestimmen, ob ein Empfänger ein Konferenzraum ist, verwenden Sie die Messaging-API-Eigenschaft (MAPI), PidTagDisplayTypeEx, des Recipient-Objekts . Sie können auf diese Eigenschaft mit dem PropertyAccessor-Objekt des Outlook-Objektmodells zugreifen. Die PidTagDisplayTypeEx-Eigenschaft wird als "http://schemas.microsoft.com/mapi/proptag/0x39050003" im MAPI-Proptag-Namespace. Beachten Sie, dass die PidTagDisplayTypeEx-Eigenschaft erst ab der Version Microsoft Exchange Server 2007 von Microsoft Exchange Server zur Verfügung steht. In vorherigen Versionen können Sie die Recipient.Type-Eigenschaft verwenden und voraussetzen, dass ein Empfänger, der einen anderen Typ als olResource besitzt, kein Konferenzraum ist.

Beispiel

Das folgende Beispiel für Visual Basic for Applications (VBA) veranschaulicht die Verwendung von PropertyAccessor für die PidTagDisplayTypeEx-Eigenschaft bei jedem Recipient-Objekt in der Recipients-Sammlung einer Besprechungsanfrage. Ist der Wert dieser Eigenschaft 7 (der Wert für die MAPI-Konstante DT_ROOM wie in der MAPI-Headerdatei mapidefs.h angegeben), ist dieser Empfänger ein Konferenzraum. In diesem Beispiel wird davon ausgegangen, dass im aktuellen Inspektor eine Besprechungsanfrage vorliegt.

Sub DemoMeetingRecipients() 
 Dim myAppointment As Outlook.AppointmentItem 
 Dim myPA As Outlook.PropertyAccessor 
 Dim d As Long 
 Dim myInt As Long 
 
 Set myAppointment = Application.ActiveInspector.CurrentItem 
 
 For d = 1 To myAppointment.Recipients.count 
 Debug.Print myAppointment.Recipients.item(d).name 
 Debug.Print myAppointment.Recipients.item(d).Type 
 Set myPA = myAppointment.Recipients.item(d).PropertyAccessor 
 myInt = myPA.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x39050003") 
 Debug.Print myInt 
 Debug.Print "---" 
 Next d 
End Sub

Im folgenden VBA-Beispiel wird CreateItem verwendet, um einen Termin zu erstellen, und MeetingStatus, um den Besprechungsstatus auf „Meeting“ (Besprechung) festzulegen und den Termin in eine Besprechungsanfrage mit einem erforderlichen und einem optimalen Teilnehmer umzuwandeln. Die Empfängernamen sollten durch gültige Namen ersetzt werden, um Fehler zu vermeiden.

Sub ScheduleMeeting() 
 Dim myItem as Outlook.AppointmentItem 
 Dim myRequiredAttendee As Outlook.Recipient 
 Dim myOptionalAttendee As Outlook.Recipient 
 Dim myResourceAttendee As Outlook.Recipient 
 
 Set myItem = Application.CreateItem(olAppointmentItem) 
 myItem.MeetingStatus = olMeeting 
 myItem.Subject = "Strategy Meeting" 
 myItem.Location = "Conference Room B" 
 myItem.Start = #9/24/2003 1:30:00 PM# 
 myItem.Duration = 90 
 Set myRequiredAttendee = myItem.Recipients.Add ("Nate Sun") 
 myRequiredAttendee.Type = olRequired 
 Set myOptionalAttendee = myItem.Recipients.Add ("Kevin Kennedy") 
 myOptionalAttendee.Type = olOptional 
 Set myResourceAttendee = myItem.Recipients.Add("Conference Room B") 
 myResourceAttendee.Type = olResource 
 myItem.Display 
End Sub

Siehe auch

Recipient-Objekt

Verweisen auf Eigenschaften nach Namespace

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.

Freigeben über