G
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?
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?