| Author | Topic: Seding email using Outlook by ActiveX |
---|
| Osvaldo Luis Aoki | Seding email using Outlook by ActiveX
on Fri, 23 Jul 2010 16:29:40 -0300Hi,
Any people has a function to send email using outlook...
I attempt to do one, but is causing error on command ( oitem:to :=
"....")
it cause compiling error on ":to" property... Look below...
FUNCTION lib_OutLookSendMsg(cFrom, cTo, cSubject, cCC, bCC, cMsg, cAttach )
local oOutLook, oTermin
oOutlook := CreateObject( "Outlook.Application" )
if empty(oOutlook)
MSGBOX('NÆo foi encontrado o OutLook/Calend rio !')
RETURN(.F.)
endif
oItem := oOutlook:CreateItem( olAppointmentItem )
oItem:treatDateAsString(.t.)
oItem:to := cTo
oItem:BCC := bCC
oItem:CC := cCC
oItem:Subject := cSubject
oItem:Body := cMsg
//oItem:BodyFormat := Outlook:OlBodyFormat:olFormatHTML()
//oItem:HTMLBody := GetString(cMsg)
//oItem:ItemEvents_Event_Close += new
Outlook.ItemEvents_CloseEventHandler(this.wApp_Close)
oItem:Save()
oItem:Send()
return(.t.) |
| Rudolf Reinthaler | Re: Seding email using Outlook by ActiveX
on Sat, 24 Jul 2010 09:33:05 +0200Hi,
use Paplos MAPI class in ot4xb, works fine.
regards
Rudolf |
| Osvaldo Luis Aoki | Re: Seding email using Outlook by ActiveX
on Sat, 24 Jul 2010 14:44:29 -0300Hi Rudolf,
But, does it registry on OutLook database ?
Thanks,
Osvaldo L Aoki
"Rudolf Reinthaler" escreveu na mensagem
news:15469c1c$496f6528$2f191@news.alaska-software.com...
> Hi,
> use Paplos MAPI class in ot4xb, works fine.
> regards
> Rudolf |
| Osvaldo Luis Aoki | Re: Seding email using Outlook by ActiveX
on Sat, 24 Jul 2010 15:04:25 -0300HI,
I didnt localize it on Ot4xb.
Osvaldo
"Rudolf Reinthaler" escreveu na mensagem
news:15469c1c$496f6528$2f191@news.alaska-software.com...
> Hi,
> use Paplos MAPI class in ot4xb, works fine.
> regards
> Rudolf |
| Rudolf Reinthaler | Re: Seding email using Outlook by ActiveX
on Sun, 25 Jul 2010 10:16:00 +0200 |