Email from Access

D

D_Pizziferri

I've been able to have Access auto-generate event-based emails. However, it
only does so after prompting the user to acknowledge the outgoing message.
Since I'm trying to use this feature to monitor user activity, it is useless
if the user is constantly bothered by (and alerted to) the outgoing emails.
Can email be sent automatically without prompts?
 
J

Jeff Conrad

I've been able to have Access auto-generate event-based emails. However, it
only does so after prompting the user to acknowledge the outgoing message.
Since I'm trying to use this feature to monitor user activity, it is useless
if the user is constantly bothered by (and alerted to) the outgoing emails.
Can email be sent automatically without prompts?
Click to expand...

Here is some info on this subject which should help.

From a past post by the angelic MVP Cheryl Fischer:Unless you are working in an Exchange environment, these prompts cannot be
turned off. If you are working in the Exchange environment see:
http://www.outlookcode.com/d/sec.htm

To work around this feature, I have been pleased with Express Soft's free
utility called "ClickYes", available for download at:
http://www.express-soft.com/mailmate/clickyes.html. It does not make the
security prompt go away, but it does use api calls to click the 'Yes' button
for you. Here is a link to a thread where you can find code that will check
to see whether ClickYes is running, start the utility, run email-related
code, and then turn the utility off. http://tinyurl.com/3x3xj

ClickYes is not the only work-around or option available; others can be
found at: http://www.outlookcode.com/d/sec.htm
And a post by someone named John Conklin:I found this on a website somewhere and just put it into my database, and it
works great.

Set outl = CreateObject("Outlook.Application")
Set mail = outl.CreateItem(olMailItem)
mail.To = "[email protected]"
mail.Subject = ActiveWorkbook.Name
mail.attachments.Add (ActiveWorkbook.FullName)
mail.display
SendKeys "^{ENTER}"

Set outl = Nothing
Set mail = Nothing
Hope that helps you,
 
D

D_Pizziferri

That's great, thanks!!

Jeff Conrad said:
Here is some info on this subject which should help.

From a past post by the angelic MVP Cheryl Fischer:
Unless you are working in an Exchange environment, these prompts cannot be
turned off. If you are working in the Exchange environment see:
http://www.outlookcode.com/d/sec.htm

To work around this feature, I have been pleased with Express Soft's free
utility called "ClickYes", available for download at:
http://www.express-soft.com/mailmate/clickyes.html. It does not make the
security prompt go away, but it does use api calls to click the 'Yes' button
for you. Here is a link to a thread where you can find code that will check
to see whether ClickYes is running, start the utility, run email-related
code, and then turn the utility off. http://tinyurl.com/3x3xj

ClickYes is not the only work-around or option available; others can be
found at: http://www.outlookcode.com/d/sec.htm

And a post by someone named John Conklin:
I found this on a website somewhere and just put it into my database, and it
works great.

Set outl = CreateObject("Outlook.Application")
Set mail = outl.CreateItem(olMailItem)
mail.To = "[email protected]"
mail.Subject = ActiveWorkbook.Name
mail.attachments.Add (ActiveWorkbook.FullName)
mail.display
SendKeys "^{ENTER}"

Set outl = Nothing
Set mail = Nothing

Hope that helps you,
Click to expand...
 
I

Icmeler

I've just read your reply as it relates to my problem.
Could someone tell me how to put the part from John Conklin into my database?
Thanks
i.e.
The part: Set Outl etc
 
Top