FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Microsoft OutLook: como saber si ha sido enviado.
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Microsoft OutLook: como saber si ha sido enviado.
Posted: Wed Mar 20, 2019 01:25 PM
Hola a las personas de buena voluntad :-)

¿ Alguien conoce la forma de saber si un email en OutLook, usando oMailItem:Display() ha sido enviado ?

Este codigo falla.
Code (fw): Select all Collapse
oMailItem:= oApp:CreateItem(0)

oMailItem:Display()

IF oMailItem:Sent  // here error, because oMailItem is not valid.
ENDIF



Necesitaria que respondiese a eventos, algo asi como:
Code (fw): Select all Collapse
oMailItem:= oApp:CreateItem(0)
oMailItem:Display()

FUNCTION MailItem_Send(lCancel)
RETURN !lCancel


Saludos
Posts: 17
Joined: Tue Oct 06, 2015 07:06 AM
Re: Microsoft OutLook: como saber si ha sido enviado.
Posted: Fri Mar 22, 2019 06:29 PM

Hola, puedes probar con:

https://docs.microsoft.com/es-es/office ... litem.sent

Edición: perdón no había visto que ya lo habías probado.

Un saludo.

Enviado desde mi SM-G955F mediante Tapatalk

Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: Microsoft OutLook: como saber si ha sido enviado.
Posted: Sat Mar 23, 2019 04:55 PM
Gracias Dario por tu amable respuesta.

Aquí un ejemplo donde habla de una forma ¿ordinaria? de hacerlo: atrapando el evento :Send().
Hasta donde yo sé adolecemos de eventos en nuestras clases OLE y por tanto no puedo definir el evento Send.
https://stackoverflow.com/questions/2533066/vba-outlook-mail-display-recording-when-if-sent-manually

Me pareciera que lo que otros compañeros hacen, cuando han de editar el mensaje a enviar, es displayar un dialogo "propio" y enviar con el metodo :Send() y asi si se puede capturar el resultado del envio. A no me parece lo adecuado porque es mejor hacer un oMailItem:Display() para que muestre un dialog de OutLook con todas sus caracteristicas. Pero si no hay otra solucion seguiremos inanes.

Gracias por tu interés.
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Re: Microsoft OutLook: como saber si ha sido enviado.
Posted: Sat Mar 23, 2019 05:03 PM

La semana que viene tenemos una reunión en Calpe (Alicante), ¿ te has planteado venir ? Igual alguno de los asistentes tiene resuelto el problema que planteas.

Saludos,
José Luis

Continue the discussion