Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Launch Outlook Email with Voting Buttons from Access

Status
Not open for further replies.

EPS5800

Programmer
Aug 8, 2005
8
0
0
US
I use the code below to successfully launch an Outlook email with an attached document. What I get is just the standard email format. I need code suggestions to have the email format with yes/no voting buttons. In another thread, it was suggested that this code would work if one were using Outlook automation:

olMail.VotingOptions = "Yes;No;I'm not sure;Can I get back to you?;I'd like to but I'm busy"

This doesn't work in my coding scheme. Ideas? (Please be gentle. I'm not good with highly technical language.)
--------------------------------------------
Note: terms such as getMail, getCAR etc are defined elsewhere in my code.

Dim varTo As Variant
Dim varCC As Variant
Dim varBCC As Variant
Dim varSubject As Variant
Dim varMessageText As Variant
Dim varEditMessage As Variant
Dim SName As Variant

Dim stDocName As String
stDocName = "rptCARReport"

varTo = getMail
varCC = ""
varBCC = ""
varSubject = "All Tasks Are Complete on CAR " & getCAR
varMessageText = "All tasks have now been completed on CAR " & getCAR & ". Please see attached."

varEditMessage = True 'Or False
DoCmd.SendObject acReport, stDocName, acFormatRTF, varTo, varCC, , varSubject, varMessageText, varEditMessage
 
Sorry but they are right. You'll need to use the Outlook API.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top