Link to home
Start Free TrialLog in
Avatar of bhynes
bhynesFlag for United States of America

asked on

Setting email priority in access97 vba code

I have this piece of code I use in Access97 which sends an email to Groupwise5.5 and it works just fine. What I would like to do is add a priority to the mail being sent but I do not know what the line of code is. I have tried
oMessage.Priority.High and oMessage.Priority = High
nether works. Also, what is the line of code for putting a mail address in the CC box?

Set oApp = CreateObject("NovellGroupWareSession")
Set oAcct = oApp.login("", "")
Set oMessages = oAcct.Mailbox.Messages
'create new message
Set oMessage = oMessages.Add()
'get mail address
oMessage.Recipients.Add ToYou
oMessage.Recipients.Add ToCC
'get subject for message
oMessage.Subject = Subj
'get message text
oMessage.BodyText = Mess
'get attachement if any
oMessage.attachments.Add AttchFile
'send it out
oMessage.Send

thanks for any help
bobh




ASKER CERTIFIED SOLUTION
Avatar of Believer
Believer

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bhynes

ASKER

The answer was the long way around and took me a long time to figure out when all I needed was oMessage.Priority = 3. Even so, thanks for the help it did get me to an answer.
Avatar of Believer
Believer

You're welcome, but sorry it turned out to be the long way around :(