Outlook 2003 alert problem

Status
Not open for further replies.
H

Henry

How can I turn Outlook alerts off?

When I try to send an email from my Excel VBA program I get the following

alert.

"A program is trying to automatically send e-mail on your behalf. Do you

want to allow this?"

Yes, No or Cancel.

Is there a way to either turn off the alert or automatically answer Yes.

Relevent part of program:

-------------Set appOL = CreateObject("Outlook.Application")

Set appMess = appOL.CreateItem(olMailItem)

For cnt = 1 To 99

If ISLIKE(Cells(cnt, 12).Value, "*@*") Then 'does cell contain email

address?

appMess.To = "Valid.e-mail@address"

appMess.Subject = "tester"

appMess.Body = "test"

appMess.Send <------ this causes alert to show

End If

Next cnt

appMess.Quit

appOL.Quit

Set appOL = Nothing

Set appMess = Nothing

-------------------------
Henry
 
See http://www.outlookcode.com/article.aspx?ID=52 for your options with

regard to the "object model guard" security.

Sue Mosher

"Henry" <henry.best@no_way.com> wrote in message

news:jCkJl.80591$vI1.16253@newsfe14.ams2...
> How can I turn Outlook alerts off?

> When I try to send an email from my Excel VBA program I get the following
> alert.
> "A program is trying to automatically send e-mail on your behalf. Do you
> want to allow this?"
> Yes, No or Cancel.

> Is there a way to either turn off the alert or automatically answer Yes.

> Relevent part of program:
> -------------------------------------------> Set appOL = CreateObject("Outlook.Application")
> Set appMess = appOL.CreateItem(olMailItem)

> For cnt = 1 To 99
> If ISLIKE(Cells(cnt, 12).Value, "*@*") Then 'does cell contain
> email address?
> appMess.To = "Valid.e-mail@address"
> appMess.Subject = "tester"
> appMess.Body = "test"
> appMess.Send <------ this causes alert to show

> End If
> Next cnt

> appMess.Quit
> appOL.Quit
> Set appOL = Nothing
> Set appMess = Nothing

> -------------------------
> Henry
>
 
Thanks Sue.

Sue Mosher [MVP] wrote:
> See http://www.outlookcode.com/article.aspx?ID=52 for your options
> with regard to the "object model guard" security.

> "Henry" <henry.best@no_way.com> wrote in message
> news:jCkJl.80591$vI1.16253@newsfe14.ams2...
> > How can I turn Outlook alerts off?
>

>> When I try to send an email from my Excel VBA program I get the
> > following alert.
> > "A program is trying to automatically send e-mail on your behalf. Do
> > you want to allow this?"
> > Yes, No or Cancel.
>

>> Is there a way to either turn off the alert or automatically answer
> > Yes. Relevent part of program:
> > -------------------------------------------> > Set appOL = CreateObject("Outlook.Application")
> > Set appMess = appOL.CreateItem(olMailItem)
>

>> For cnt = 1 To 99
> > If ISLIKE(Cells(cnt, 12).Value, "*@*") Then 'does cell contain
> > email address?
> > appMess.To = "Valid.e-mail@address"
> > appMess.Subject = "tester"
> > appMess.Body = "test"
> > appMess.Send <------ this causes alert to show
>

>> End If
> > Next cnt
>

>> appMess.Quit
> > appOL.Quit
> > Set appOL = Nothing
> > Set appMess = Nothing
>

>> ------------------------->

>> Henry
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
D Wishlist How to use 'app password' in Outlook 2003 after Google pulled plug on "less secure apps" Using Outlook 2
J Outlook 2003 .pst Will Not Restore Completely to Outlook 2019 Using Outlook 5
D Outlook 2003 Mail Fails Using Outlook 1
D Wrong email address in Outlook 2003 "From" tab in new outgoing emails Using Outlook 4
V Outlook 2003 and Windows 11 Using Outlook 4
glnz Moving from Outlook 2003 to MS365 Outlook - need basics Using Outlook 4
I Outlook 2003 shows html code when To: field is empty Using Outlook 7
B Outlook 2003 email sending & receiving suddenly stopped working Using Outlook 3
H Outlook 2003 find by "has attachment" Using Outlook 1
glnz How set up new IMAP on Outlook-Office 365 and merge in pst from Outlook 2003 for same two email accounts? Using Outlook 5
P Import Categories from Outlook 2003 Using Outlook 8
V Outlook 2003 problem with Windows 10 Creators Update 1709 Using Outlook 0
M Outlook 2003 pictures - some visible, some not Using Outlook 0
S Outlook 2003 to Outlook 2013 pst file Using Outlook 5
O Memory Leak in Outlook 2003 Using Outlook 3
W Changing looks of emails in Outlook 2003 Using Outlook 0
O Outlook 2003 can't send, but settings seem OK Using Outlook 1
P URL Hyperlink not working correctly in Outlook 2003 Using Outlook 10
O Outlook 2003 can't open contacts. Using Outlook 2
O Promoting Outlook 2003 User Templates Using Outlook 1
O W-a-a-y too many PSTs (Outlook 2003) Using Outlook 0
J Outlook 2003-2010 PST Field Editor Using Outlook 1
P Outlook 2003 - Do I need a new profile? Using Outlook 2
E Want to Import Outlook 2003 pst files to later version Using Outlook 6
A error message outlook 2003 Using Outlook 1
B Seeking advice now Outlook 2003 is unsupported by Exchange Using Outlook 4
O Change Debit to Credit in Outlook 2003? Using Outlook 1
J problems downloading POP3 emails to Outlook 2003 Using Outlook 1
G Outlook 2003 VBA Won't Run In Outlook 2010 Outlook VBA and Custom Forms 4
P Outlook 2003 - possible to recreate corrupt account? Using Outlook 3
Calvyn Outlook 2003 cannot import .vcs subject Using Outlook 1
T Query about one aspect of migrating .pst files from Outlook 2003 to Outlook 2013 Using Outlook 5
C Outlook 2003 contacts Using Outlook 1
G Configuring Outlook 2003 for Gmail with both pop3 & imap4 accounts Using Outlook 1
M HELP--Extract Data from 2003 outlook transfer to excel spreadsheet Using Outlook 1
V Outlook 2003 editing problem Using Outlook 4
X Outlook 2003 not sending all of the new email message Using Outlook 1
2 How to use outlook 2003 calendar in always offline mode Using Outlook 0
G Outlook 2003 I need to move email to folder based on subject, using wild card Using Outlook 0
G outlook 2013 - Open In Outlook 2003 Using Outlook 1
A Exchange 2003 Outlook 2010 64 Bit- AutoDiscover Connection Err - Certificate Exchange Server Administration 9
T Use Outlook 2003 with Office 2013 Using Outlook 1
D Outlook 2003 contact folder opend in scrolled down position Using Outlook 2
O Need advice ASAP! Outlook 2003. Using Outlook 1
H Custom Contact form not working in Outlook 2003 Using Outlook 3
O Outlook 2003 forms problem Using Outlook 3
O Duplicate folders in Outlook 2003 Using Outlook 3
O Moving OUtlook 2003 from bad XP to Win 7 Pro 64 -- URGENT! Using Outlook 8
A File - Save Attachments does nothing in Outlook 2003 with Exchange 2010 ... Using Outlook 3
R Menus in a new\old email not there in Outlook 2003 Using Outlook 2

Similar threads

Back
Top