Automating Access Reports

[Guest]

What is the best way to automatically send Access Reports to an email address
without user interaction? More specifically, I want to be able to run a
report from an mdb without any user performing an event. This report will be
sen to an email address.

 

[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 = "(e-mail address removed)"
mail.Subject = ActiveWorkbook.Name
mail.attachments.Add (ActiveWorkbook.FullName)
mail.display
SendKeys "^{ENTER}"

Set outl = Nothing
Set mail = Nothing

It doesn't bring up that pesty Outlook warning message when sending. I have
this send an email after a certain field value is changed. I put it inthe
BeforeUpdate Event of my control.

Hope it help,
~John

 

[Guest]

John: Help out a newcomer.....I have over 100 reports which I have already
created sendto macros for and they e-mail to the correct person. How do I
use your expressions to automatically do this on a regular basis...ex: every
Friday