A fin de enviar a fin de mes las facturas en pdf via e-mail, a los clientes que así lo desean, estoy utilizando unas rutinas que lo hacen a través de blat.exe, y funciona perfectamente a excepción de la confirmación de lectura, que no me retorna si ha sido leido.
Estoy haciendo pruebas con el siguiente codigo
Code: Select all
#include "Fivewin.ch"
#define olMailItem 0
FUNCTION MAIN()
LOCAL oOutlook, oMail
oOutlook = CREATEOBJECT( "Outlook.Application" )
oMail = oOutlook:CreateItem( olMailItem )
oMail:Recipients:Add( "cliente@cliente.com" )
oMail:Subject = "Test"
oMail:Attachments:Add( "c:\pdf\0042126472.pdf" )
// oMail:HTMLBody = MEMOREAD( "c:\xharbour\test.htm" )
oMail:Send()
oOutlook:Quit()
RETURN NIL
También me gustaría saber como quitar el aviso que sale que dice que otra aplicación está intentando enviar un correo, puede tratarse de un virus.
En Outlook expres hay un checkbox que deshabilitandolo no sale, pero en Outlook no consigo localizarlo.
Saludos
Jose Luis