Email in Access

[Guest]

Thanks to all of you that have helped me get this far.
I want to print and then email a report to a "fixed" email address.
This is the code I am using......

Dim objOutlook As Outlook.Application
Dim objEmail As Outlook.MailItem
Set objOutlook = CreateObject("Outlook.application")
Set objEmail = objOutlook.CreateItem(olMailItem)
With objEmail
.To = "(e-mail address removed)"
.Subject = "Budget Report"
.body = "Please see the attachment"
.Attachments.Add "C:\Temp\Budgets.snp"
.Send
End With

The snp file is being created, I am getting the message from Outlook about
another application trying to use the mail facility etc.
When this message appears I hit the Yes button.
Unfortunately, the recipient is not receiving the email.
For test purposes, I am the recipient and am quoting my hotmail email
address as I know that I have no problems receiving other emails.
Any ideas?

 

[Guest]

What should the code be if you use Outlook Express ?

 

[Ron2005]

Have you checked to see if hotmail is putting it in the Junk catagory?

Have you checked in your outlook sent folder to see if your outlook
thinks it has really sent it?

Try sending it to the email address that outlook is looking at (or are
you one of the ones that got grandfathered in as to using outlook to
look at and download hotmail email?)

Ron