Compartir a través de


Evento MailItem.BeforeCheckNames (Outlook)

Se produce justo antes de que Microsoft Outlook empiece a resolver nombres en la colección de destinatarios de un elemento (que es una instancia del objeto primario).

Sintaxis

expresión. BeforeCheckNames( _Cancel_ )

expresión Variable que representa un objeto MailItem.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
Cancel Obligatorio Boolean False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no se completa el proceso de resolución de nombres.

Comentarios

El evento BeforeCheckNames se usa en VBScript, pero el evento no se desencadena cuando se resuelve un nombre de correo electrónico en el formulario.

El evento no se desencadena en las siguientes circunstancias:

  • Cuando se personaliza un formulario de entrada del Diario y después se resuelve un contacto en el campo Contactos.

  • Cuando se personaliza un formulario de contacto y después se resuelve un contacto en el campo Contactos.

  • Cuando se personaliza cualquier tipo de formulario y Outlook resuelve automáticamente el nombre en segundo plano.

  • Cuando se crea y se resuelve un destinatario mediante programación.

Ejemplo:

En este ejemplo de Visual Basic para aplicaciones (VBA) se pregunta al usuario si el usuario desea resolver nombres y devuelve False para cancelar la operación si el usuario responde que no. El código de ejemplo debe colocarse en un módulo de clase como ThisOutlookSession, y se debe llamar al SendMail() procedimiento antes de que Outlook pueda llamar al procedimiento de evento.

Public WithEvents myItem As Outlook.MailItem 
 
 
 
Private Sub myItem_BeforeCheckNames(Cancel As Boolean) 
 
 If MsgBox("Do you want to resolve names now?", 4) = vbOK Then 
 
 Cancel = True 
 
 End If 
 
End Sub 
 
 
 
Public Sub SendMail() 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 myItem.Recipients.Add ("Dan Wilson") 
 
 myItem.Recipients.Add ("Nate Sun") 
 
 myItem.Body = "Good morning!" 
 
 myItem.Send 
 
End Sub

Consulte también

Objeto MailItem

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.