Propiedad Recipient.Type (Outlook)
Devuelve o establece un Long que representa el tipo de destinatario. Lectura y escritura.
Sintaxis
expresión. Tipo
Expresión Variable que representa un objeto Recipient .
Comentarios
Según el tipo de destinatario, esta propiedad devuelve o establece un Long que corresponde al equivalente numérico de una de las constantes siguientes:
destinatario JournalItem: constante OlJournalRecipientType: olAssociatedContact.
destinatario MailItem: una de las constantes OlMailRecipientType siguientes: olBCC, olCC, olOriginator u olTo.
destinatario MeetingItem: una de las constantes OlMeetingRecipientType siguientes: olOptional, olOrganizer, olRequired u olResource.
destinatario TaskItem: cualquiera de las constantes OlTaskRecipientType siguientes: olFinalStatus u olUpdate.
Esta propiedad probablemente no devuelva siempre el tipo de destinatario apropiado para una sala de conferencias. Por ejemplo, puede especificarse una sala de conferencias como un destinatario requerido en una convocatoria de reunión, en cuyo caso esta propiedad no devolverá olResource para dicha sala de conferencias.
Para determinar con fiabilidad si un destinatario es una sala de conferencias, utilice la propiedad de la API de mensajería (MAPI), PidTagDisplayTypeEx del objeto Recipient. Puede tener acceso a esta propiedad utilizando el objeto PropertyAccessor en el modelo de objetos de Outlook. La propiedad PidTagDisplayTypeEx se representa como "http://schemas.microsoft.com/mapi/proptag/0x39050003" en el espacio de nombres proptag MAPI. Tenga en cuenta que la propiedad PidTagDisplayTypeEx no está disponible en versiones de Microsoft Exchange Server anteriores a Microsoft Exchange Server 2007; en esas versiones anteriores de Exchange Server, puede usar la propiedad Recipient.Type y se supone que un destinatario tenga un tipo que no sea olResource no es una sala de conferencias.
Ejemplo:
El ejemplo siguiente Visual Basic para aplicaciones (VBA) se muestra cómo se usa PropertyAccessor en la propiedad PidTagDisplayTypeEx para cada uno de los objetos Recipient de la colección de destinatarios de una convocatoria de reunión. Si el valor de la propiedad es 7 (el valor de la constante MAPI por ejemplo tal como se define en el archivo de encabezado MAPI, mapidefs.h), entonces que el destinatario es una sala de conferencias. En este ejemplo se supone que hay una convocatoria de reunión en el inspector actual.
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
En el siguiente ejemplo VBA se utiliza el método CreateItem para crear una cita y se utiliza la propiedad MeetingStatus para establecer el estado de la reunión como "Meeting" para convertirlo en una convocatoria de reunión con un necesario y un asistente opcional. Los nombres de los destinatarios se deben reemplazar con nombres válidos para evitar errores.
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
Consulte también
Hacer referencia a propiedades por espacio de nombres
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.