Solved

How to turn off Microsoft Outlook security warnings

Posted on 2004-08-18
8
866 Views
Last Modified: 2008-02-01
When I send an email through my VB6 MAPI application, I get to warning messages from Outlook;

Another program is trying to access email addresses you have stored in Outlook…
Press “Yes” to allow

A program is trying to automatically send email on your behalf
Press “Yes” to allow

Is there a way to bypass \ avoid these warning messages?

Thanks in advance,
John
0
Comment
Question by:JohnFra
  • 4
  • 2
8 Comments
 
LVL 3

Expert Comment

by:ashunigam
ID: 11838109
There is a code link to bypass the message
http://www.tek-tips.com/faqs.cfm?fid=5230
0
 
LVL 3

Expert Comment

by:ashunigam
ID: 11838129
for your ease

' Declare Windows' API functions
Private Declare Function RegisterWindowMessage _
        Lib "user32" Alias "RegisterWindowMessageA" _
        (ByVal lpString As String) As Long

Private Declare Function FindWindow Lib "user32" _
        Alias "FindWindowA" (ByVal lpClassName As Any, _
        ByVal lpWindowName As Any) As Long

Private Declare Function SendMessage Lib "user32" _
        Alias "SendMessageA" (ByVal hwnd As Long, _
        ByVal wMsg As Long, ByVal wParam As Long, _
        lParam As Any) As Long

Private Sub Turn_Auto_Yes_On()
Dim wnd As Long
Dim uClickYes As Long
Dim Res As Long
uClickYes = RegisterWindowMessage("CLICKYES_SUSPEND_RESUME")
wnd = FindWindow("EXCLICKYES_WND", 0&)
Res = SendMessage(wnd, uClickYes, 1, 0)
End Sub

Private Sub Turn_Off_Auto_Yes()
Dim wnd As Long
Dim uClickYes As Long
Dim Res As Long
uClickYes = RegisterWindowMessage("CLICKYES_SUSPEND_RESUME")
wnd = FindWindow("EXCLICKYES_WND", 0&)
Res = SendMessage(wnd, uClickYes, 0, 0)
End Sub


Sub Send_Mails()
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem

'Enables automatic "YES" clicks for Outlook
Turn_Auto_YES_On               '******************

'set variables for Outlook and a message
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
    With MailOutLook
        .To = "Name of recipient"
        .Subject = "Subject Goes Here"
        .HTMLBody = "This could be a title<br><br>message body and instructions<br>could go here"
        .Attachments.Add "Path & Filename", olByValue, 1, "Filename To Display"
        .Send
    End With

'Turns off the Auto_Yes program
Turn_Off_Auto_YES                    '**********************
Set MailOutLook = Nothing
Set appOutLook = Nothing
End Sub
0
 

Author Comment

by:JohnFra
ID: 11838205
Thanks ashunigam, I tried your code but I still get the message "A program is automatically trying to send e-mail.. " And the YES is still required to continue :(
0
U.S. Department of Agriculture and Acronis Access

With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.

 
LVL 3

Accepted Solution

by:
ashunigam earned 250 total points
ID: 11838251
Sorry about that here is a free tool to click on your behalf that may help... from another tip from tek-ltip site.

In previous code try after removing line Turn_Off_Auto_YES                    


http://www.tek-tips.com/viewthread.cfm?qid=641859



The security dialogs that pop up when an application tries to access certain Outlook properties and methods are designed to inhibit the spread of viruses via Outlook; see http://www.slipstick.com/outlook/esecup.htm#autosec

If you are a standalone user, Outlook provides no way to suppress this behavior. However, you can use a free tool called Express ClickYes:
http://www.express-soft.com/mailmate/clickyes.html
to click the security dialog buttons automatically. Beware that this means if a virus tries to send mail using Outlook or gain access to your address book, it will
succeed.

If you're the administrator in an Exchange Server or HP OpenMail environment, you can reduce the impact of the security prompts with administrative tools. See http://www.slipstick.com/outlook/esecup/admin.htm

If it's an application you wrote yourself, normally you can use one of these approaches to redo the program:

 -- Use Extended MAPI
see http://www.slipstick.com/dev/mapi.htm and C++
or Delphi; this is the most secure method and the only one that Microsoft recommendeds.

 -- Use Redemption
http://www.dimastr.com/redemption/
a third-party COM library that wraps around Extended MAPI but parallels the Outlook Object Model

 -- Use SendKeys to "click" the buttons on the security dialogs that your application may trigger. See
http://www.slipstick.com/outlook/esecup.htm#autosec
for a link to sample code.

 -- Program the free Express ClickYes
http://www.express-soft.com/mailmate/clickyes.html
to start suspended and turn it on only when your program needs to have the buttons clicked automatically.

--
Source: Sue Mosher, Outlook MVP
0
 
LVL 53

Expert Comment

by:Dhaest
ID: 11838554
Outlook: How do I suppress Outlook’s warning message “Someone is trying to send a mail on your behalf  …. ”
  http://www.experts-exchange.com/Programming/Programming_Languages/Visual_Basic/VB_Controls/Q_20706908.html
0
 
LVL 3

Expert Comment

by:ashunigam
ID: 11838784
Hi Dhaest
Just for your information.
http://www.slipstick.com/outlook/esecup.htm#autosec link is already part of my posting, that is suggested by you in link above.

Thanks
0
 
LVL 53

Expert Comment

by:Dhaest
ID: 12378049
Answered by ashunigam
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
MS Access - Capture pressed key onclick 4 28
Sharepoint 2013 Library List View Limitations 9 52
Spell Check in VB6 13 99
COPY from excel to notepad 3 37
Lync meeting or Lync conferencing is what many organizations would like to deploy to allow them save money. But companies are now giving up for various reasons, one of which is that they cannot join external meetings (non-federated company meetings)…
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
The viewer will learn how to create two correlated normally distributed random variables in Excel, use a normal distribution to simulate the return on different levels of investment in each of the two funds over a period of ten years, and, create a …

896 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now