• Home
 · 
• Internet/HTML
 · 
• Send email with Microsoft Office Outlook 2000 - 2003 without the Warning A program is trying to sen

Send email with Microsoft Office Outlook 2000 - 2003 without the Warning A program is trying to sen

Send email with Microsoft Office Outlook 2000 - 2003 without the Warning A program is trying to send mail. Includes attachment coding.

API Declarations


'Hope this is helpful!



Rate Send email with Microsoft Office Outlook 2000 - 2003 without the Warning A program is trying to sen

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Const olByValue = 1
    Set OutlookItem = Application.CreateItem(0)
    OutlookItem.To = "[email protected]"
    OutlookItem.Subject = "This will work!"
    OutlookItem.Body = "This works great, no warning message from Outlook!"
    Set ColAttach = OutlookItem.Attachments
    strPath = App.Path & "\simple.txt"
    ColAttach.Add strPath, olByValue, 1, "File Attachment"
    OutlookItem.Display
    SendKeys "%{s}", True