Yes, thanks...spec calls for user to review everything and they have the responsibility to press Send...the app will not auto-send it.
On 8/21/2019 7:40 AM, Frank Cazabon wrote:
Mike,
along with Alan's code you can use loMsg.Display() to display the email on screen before sending.
Frank.
Frank Cazabon
On 21/08/2019 04:17 AM, Alan Bourke wrote:
If you want to use Outlook:
loOutlook=CreateObject("Outlook.Application") loMsg = loOutlook.CreateItem(0) loMsg.BodyFormat= 2 && olFormatHTML loMsg.HtmlBody="<p>HTML body text</p>" loMsg.Body = "Plain body text for clients without HTML mail support." loMsg.Subject="Subject" loMsg.Recipients.Add("someguy@somewhere.com") loMsg.Recipients.Add("somegal@anotherplace.com") loMsg.Attachments.Add("attach1.txt", 1) loMsg.Attachments.Add("attach2.txt", 1) loMsg.Attachments.Add("attach3.txt", 1)
Try llSent = loMsg.Send() Catch to loException && handle it Finally release loMsg release loOutlook Endtry
HOWEVER
There are some drawbacks to this.
- Despite it sending via Outlook, you will find that any Outlook
signatures or stationery that would normally apply won't get used on the programmatically created message.
- You may find that the dread Outlook security message ('A program is
trying to send mail on your behalf...') will crop up, depending on Outlook and Exchange Server version.
[excessive quoting removed by server]