Compartir a través de

Propiedad Recipient.Type (Outlook)

  • Artículo

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:

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

Recipient (objeto)

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.