Specify sender address usinf with mailoutlook

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I'm using VBA 6.3 to write code for an action button on an Access form. When
pressed, the code formats an outlook mail message using "with mailoutlook".
The email forms just fine except for the sender address, I can't find any way
except using sendkeys for this. As I'm sure you can guess, this isn't a very
good solution. I'd like use an actual function or variable to set the sender
as I have 3 0r 4 mailboxes I can send from and most often my default is not
what I want to use. Below is part of my current code that works just fine:

' compile email message


With mailoutlook
.Importance = aryMailImportance(CInt(strMailImportance))
.To = mailTo
.Subject = mailSubject
.BCC = mailBCC
.HTMLBody = mailBody

.display
End With

Next is what I'm using to set the sender address that I would like to change:

SendKeys "%R", True
SendKeys "ISS"

Any ideas?
 
Back
Top