[MS_AccessPros] Re: Sending email from Access

 

Jim

By using .Display, you are giving the user a chance to edit the email. It's up to them to send it. If you use .Send you sometimes have to give Outlook a kick by using this:

.Send

DoEvents

objOLApp.Session.SendAndReceive

Why the Send sometimes gets stuck in the Outbox is a mystery to me.

-Bill

---In MS_Access_Professionals@yahoogroups.com, <luvmymelody@yahoo.com> wrote :

Hello all,

I would like for my email message being sent from Access to not go directly to the outbox. I have never had this issue before. My code below that I am using will send an email but will not let the user edit it without opening it from the outbox. I took out the email address for privacy reasons. Is there something I am missing?

Thank You

Jim Wagner

Set objol = New Outlook.Application
Set objmail = objol.CreateItem(olMailItem)
With objmail
.To = ""

.Subject = "Requesting help for the Agency/Org Database"
.Body = "Database found at P:\BUDGETING_FINANCE\FORMS AND POLICIES\Business Operations Documents" _
 & vbCrLf & vbCrLf & _
" Please assist with the following issue.... "

.NoAging = True
.Display
End With
Set objmail = Nothing
Set objol = Nothing
SendKeys "%{s}", True

 

__._,_.___

---

Posted by: wrmosca@comcast.net

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (3)

Visit Your Group

• Privacy • Unsubscribe • Terms of Use

.

__,_._,___