Recipients.Count in VB funktioniert nicht

Question

Ich habe ein Outlook-Add-in, in dem ich versuche, auf Empfänger der Termineinladung zuzugreifen. Obwohl die Empfängerspalte null ist, gibt der Code Outlook.AppointmentItem.Recipients.Count 1 zurück, und Recipients gibt die E-Mail des Absenders zurück.

Dim recips As Outlook.Recipients 
Dim recip As Outlook.Recipient 
Dim flag As Boolean = False 

cal = Application.ActiveInspector().CurrentItem 
recips = cal.Recipients 
cal.Save() 
MessageBox.Show(recips.Count) 
For Each recip In recips 
    MessageBox.Show(recip.Address) 
Next 

Kann jemand vorschlagen, warum dies geschieht?

Answer 1

Sie können die Methode GetAssociatedAppointment verwenden, die ein Objekt AppointmentItem zurückgibt, das den Termin darstellt, der mit der Besprechungsanfrage verknüpft ist. Dann können Sie die folgenden Eigenschaften verwenden:

• RequiredAttendees - gibt ein Semikolon getrennte String der erforderlichen Teilnehmernamen für den Besprechungstermin.
• OptionalAttendees - gibt einen String zurück oder legt diesen fest, der die Anzeigezeichenfolge der optionalen Teilnehmernamen für den Termin darstellt.

Und natürlich die Recipients Eigenschaft der AppointmentItem-Klasse.

Answer 2

Dies ist von Entwurf - der Termin-Organizer befindet sich immer in der Empfängertabelle. Sie können herausfinden, wer der Veranstalter ist, indem Sie die PR_RECIPIENT_FLAGS Eigenschaft (DALS-Name http://schemas.microsoft.com/mapi/proptag/0x5FFD0003) mit Recipient.PropertyAccessor.GetProperty betrachten. Der Organisator wird recipOrganizer (= 2) Bit gesetzt haben.