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.