FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour TMail Class
Posts: 1091
Joined: Thu Nov 17, 2005 11:08 AM
TMail Class
Posted: Mon Oct 10, 2016 12:14 PM
I have to set sender field

...
LOCAL aSend := { "m.boschi@marcoboschi.it" , "info@marcoboschi.it" }
...
DEFINE MAIL oMail ;
SUBJECT cSubject ;
FROM USER ;
TEXT cText
...
oMail:aOrigin := aSend
...
ACTIVATE MAIL oMail

Is it correct?

Many Thanks
Marco
Marco Boschi
info@marcoboschi.it
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: TMail Class
Posted: Mon Oct 10, 2016 01:37 PM
No:

Code (fw): Select all Collapse
LOCAL aSend := { { "m.boschi@marcoboschi.it", NIL } , { "info@marcoboschi.it", NIL } }

...

oMail:aRecipients := aSend


EMG
Posts: 1091
Joined: Thu Nov 17, 2005 11:08 AM
Re: TMail Class
Posted: Sat Mar 04, 2017 05:51 PM
Hi,
I have to send email in a pc with Outlook 2010 installed.

How should I initialize array containing Reipients?

Enrico a few months ago write to me this
in this topic

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=33046&p=194607&hilit=marco+boschi#p194607
Code (fw): Select all Collapse
LOCAL aSend := { { "m.boschi@marcoboschi.it", NIL } , { "info@marcoboschi.it", TO_VALUE } }

LOCAL aSend := { { "m.boschi@marcoboschi.it", TO_VALUE } , { "info@marcoboschi.it", CC_VALUE } }


here there is some documentation

https://msdn.microsoft.com/en-us/library/office/ff863703.aspx

https://msdn.microsoft.com/en-us/library/office/ff866751.aspx

Many thanks
Marco Boschi
info@marcoboschi.it
Posts: 1091
Joined: Thu Nov 17, 2005 11:08 AM
Re: TMail Class
Posted: Sat Mar 04, 2017 05:59 PM
maybe in this way?

Code (fw): Select all Collapse
oRecip:Add( "info@marcoboschi.it" )
oRecip:Add( "m.boschi@marcoboschi.it" )
oRecip[ 1 ]:Type := 1
oRecip[ 2 ]:Type := 2


It works.....
Marco Boschi
info@marcoboschi.it

Continue the discussion