Send an Email without the following message

[Jeff]

Hello,

I am using the DoCmd.SendObject to send an Email & it
works fine.

However when it goes to send the Email the following
message pops up

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

It makes you wait & then you HAVE to hit the Yes button
for it to send the Email.

Is their any way arround this to just send the Email,
I cant have the user wait & click Yes every time.

Also note the Email has a file attachment.

Any help would be greatly appreciated !
Thank you,
Jeff
(e-mail address removed)

 

[AlCamp]

Jeff,
This really sounds like your "firewall program" is informing you that a
program is trying to access your internet connection.
Access should be using your Windows "default" email program to do the
SendObject, so I'm surprised that your firewall doesn't already know about
that program has permission to access the web, at any time, without asking.
Whatever Email program SendObject uses... go into your firewall program,
and give that program permission to use the connection... without having to
ask you.

If not, try to find an newsgroup that might deal with your Firewall
program, and see if you can get some help there.

hth
Al Camp

 

[Rick Brandt]

This is actually the built in security in the newer versions of Outlook. it
cannot be turned off at the client.

 

[Guest]

Jeff,

I'm having the same issue. I believe it started when I updated my Office to
SP-2 (and new security features?). I haven't found a way around it yet, but
I don't think it's related to Firewall as my work PC is off of the company's
firewall (and it happens even when sending to internal email addresses as
well).

I was going to look into certificates as a possible solution, but haven't
made any progress on it. I'll keep looking, but if you happen to find the
solution would you mind posting it?

Regards,
Doug Miller

 

[Jeff]

All,

Thnx for your responses..

However I am aware of what causes the problem, what I
need is a solution.

It doesnt have anything to do with a firewall.
It is an Outlook Security setting. In Outlook express
you can change it but not regular Outlook.

Any other ideas ? There has to be some code that can do
this.

I found some links on autocliking Yes programs that can
run in the background but I would like to avoid that if
possible. (
(http://www.express-soft.com/mailmate/clickyes.html)


Thnx,
Jeff

 

[AlCamp]

Thanks Rick,
My first take was that perhaps it was related to the new XP SP2 upgrade
"windows firewall".
Al Camp

 

[Richard]

I'm also having the problem at work - where the Exchange people that
for my organisation will be loathe to install software to turn it off
- this is what is meant to happen.

Interestingly, my problem only happens when Outlook is closed. If it
is already open I don't get the security message.

I've just decided to leave it.



Richard

All,

Thnx for your responses..

However I am aware of what causes the problem, what I
need is a solution.

It doesnt have anything to do with a firewall.
It is an Outlook Security setting. In Outlook express
you can change it but not regular Outlook.

Any other ideas ? There has to be some code that can do
this.

I found some links on autocliking Yes programs that can
run in the background but I would like to avoid that if
possible. (
(http://www.express-soft.com/mailmate/clickyes.html)


Thnx,
Jeff

Its a good job Einstein never had to fill out one of these Government Grant applications or we never would have found out what e equalled. The West Wing

 

[AlCamp]

Jeff,
As I previously suggested, if you can't get a solution here, I'm sure
there are Outlook newsgroups where this question would be better addressed.
Al Camp

 

[Rick Brandt]

Thanks Rick,
My first take was that perhaps it was related to the new XP SP2 upgrade
"windows firewall".
Al Camp

There are actually two different security popups in Outlook/MAPI now.
The older one has been around since Outlook 2000 Service Pack 2. That
is the one that says...

"A program is trying to send Email..."

This one has the [OK] button with the five second pause that you have to
wait for. The newer one says...

"A program is trying to access your address book..."

This one has [Yes] and [No] along with an "Allow for n minutes" option
which as far as I can see only serves to limit the prompts to once per
message regardless of how many minutes you specify.

There are things the admins can do in an Exchange Server environment to
eliminate these messages, but there is nothing you can do at the client
except to avoid using Outlook/MAPI to send your messages.

 

[MikeC]

Jeff,

I'm copying and pasting the below from a post I made the other day...

You can use one of the below products as a solution depending on your
particular needs.

1) The good thing about Express ClickYes is that it's free. The most
significant disadvantage is that this software stops processing commands if
your Windows NT, Windows 2000, Windows XP or Windows 2003 workstation is
*locked*.

http://www.contextmagic.com/express-clickyes/

2) Outlook Redemption is the robust alternative. It's free to test. To
use for commercial (production) purposes, it costs only $200. I have used
this product and it works very well. You will need to make some small
modifications to your code to take advantage of the Redemption DLL.

http://www.dimastr.com/redemption/

 

[MikeC]

....sorry, I meant to say, "small changes to your TBD automation code."

As already stated in other posts, SendObjects will always trigger the
message if you are using a later version of Outlook as your email
application.

 

[Jeff]

I found a SOLUTION, it works perfect for me.

Use this code...


Dim objOutlook As New Outlook.Application
Dim objMail As MailItem

Set objOutlook = New Outlook.Application
Set objMail = objOutlook.CreateItem(olMailItem)

EmailAddr = "(e-mail address removed)"
CopyEmailAddr = "(e-mail address removed)"
Subj = "Test subjject"
Body = "Body"
PathName = "C:\test.txt"

With objMail
.To = EmailAddr
.cc = CopyEmailAddr
.Subject = Subj
.Body = Body
.NoAging = True
.Attachments.Add PathName
.Display
End With

SendKeys "%{s}", True 'send the email without prompts

Set objMail = Nothing
Set objOutlook = Nothing



Jeff

 

[Jeff]

Mike,

I found a SOLUTION, it works perfect for me.

Use this code...


Dim objOutlook As New Outlook.Application
Dim objMail As MailItem

Set objOutlook = New Outlook.Application
Set objMail = objOutlook.CreateItem(olMailItem)

EmailAddr = "(e-mail address removed)"
CopyEmailAddr = "(e-mail address removed)"
Subj = "Test subjject"
Body = "Body"
PathName = "C:\test.txt"

With objMail
.To = EmailAddr
.cc = CopyEmailAddr
.Subject = Subj
.Body = Body
.NoAging = True
.Attachments.Add PathName
.Display
End With

'****** Send the email without prompts *******
SendKeys "%{s}", True
'****************************************************

Set objMail = Nothing
Set objOutlook = Nothing

 

[Guest]

Hi

Try this: http://www.contextmagic.com/express-clickyes/

madhouse