Enviar Correo Con Outlook

[keys]

Hola a todos. Tengo un proceso para enviar correos a través de outlook. Hasta ahora funcionaba correctamente.

Código Delphi [-]
 
  vMailItem := Outlook.CreateItem(olMailItem);
  vMailItem.Recipients.Add("correo@correo.com);
  vMailItem.Subject := "Asunto";
  vMailItem.Body := "cuerpo del mensaje";  
  vMailItem.Send;

El problema es que al enviar a una dirección en concreto me retorna el error "Outlook no reconoce alguno de los nombres", he comprobado que el email esta correcto.

Tengo en los contactos de outlook un contacto creado con ese email. Si elimino el contacto de outlook o le cambio el email del contacto lo envia corretamente. Pero si lo envío con el contacto con ese email da error.

Si envio a otros correos que estan en contactos tambien me envía bien. Pero hay unos cuantos que me da error si esta en contactos.

[Casimiro Notevi]

https://www.clubdelphi.com/foros/showthread.php?t=29128

[keys]

Lo primero gracias.

No creo que sea el mismo problema. Si envío el correo directamente desde el outlook a esa dirección funciona correctamente.

El mensaje no llega a ponerse en la bandeja de salida, cuando hago el send es cuando da el error generando una excepción.

Como ya he dicho si elimino el contacto en el otulook o le cambio el email en el contacto del outlook, el envío se realiza correctamente.

Una de las pruebas que he hecho es parar el antivirus, pero sigue haciendo lo mismo.

Un saludo.

[Garada]

En mi código uso la propiedad To_ en vez de Recipients

Código Delphi [-]
vMailItem.To_ := "correo@correo.com";

Si no te va, avisa y te pongo completa la función que uso para enviar desde el Outlook.

[keys]

Empezado por Garada

En mi código uso la propiedad To_ en vez de Recipients

Código Delphi [-]
vMailItem.To_ := "correo@correo.com";

Si no te va, avisa y te pongo completa la función que uso para enviar desde el Outlook.

Gracias ya lo habia probado tambien y me da el mismo error.

Por lo que he estado mirando debe ser un problema que ocurre con las cuentas de Microsoft Exchange y los contactos. Lo que no se es por que algunos contactos si y otros no. Si borro el contacto que da problemas y lo vuelvo a crear exactamente igual, ese contacto ya funciona. El problema es que estamos hablando de casi 500 contactos que dan error.

He probado a cambiar el send por display para que salga la ventana antes de enviar y en los que da problema en la direccion pone correo@correo.com solo esto y en los que si funciona pone CONTACTO(correo@correo.com).

En ambos casos el correo esta bíen puesto.

[Ñuño Martínez]

Una pregunta tonta: ¿No sería mejor mandar el correo diréctamente al servidor de correo? O sea, usar POP o SMPT o el protocolo que sea (con synapse es bastante simple, y seguramente que JEDI e Indy también ayudarán) y ya está.