topic RE: Flag Email Outlook in Product Forum

Flag Email Outlook

SebT — Thu, 14 May 2020 10:14:00 GMT

Hi all

I am looking to create a code stage that given Mail ID, Outlook Profile and Subfolder as inputs will mark the particular email with a flag and/or mark it with a color.

I have looked into the FlagStatus property but haven't been able to get it to work.

Has anybody had any luck achieving this?

Thanks

------------------------------
Seb T
------------------------------

RE: Flag Email Outlook

AmiBarrett — Thu, 14 May 2020 19:45:00 GMT

Hopefully this helps!

Inputs:
Profile - Text
Subfolder - Text
ID - Text
markAs - Text (Expects "flag" or "done")

Outputs:
N/A

Dim Outlook as object
Outlook = CreateObject("Outlook.Application")

Dim ns as object
ns = Outlook.GetNameSpace("MAPI")

if Profile <> "" then
    ns.Logon(Profile, , True, True)
end if
Dim item = ns.GetItemFromID(ID)


if markAs = "flag" then
	item.FlagIcon = 6
	item.FlagStatus = 2
	item.FlagRequest = "Follow up"
	item.ReminderSet = False
else if markAs = "done" then
	item.FlagIcon = 0
	item.FlagStatus = 1
	item.FlagRequest = "Completed"
	item.ReminderSet = False
else
	item.FlagIcon = 0
	item.FlagStatus = 0
	item.FlagRequest = ""
	item.ReminderSet = False
end if

------------------------------
Ami Barrett
Sr Product Consultant
Blue Prism
Plano, TX
------------------------------

RE: Flag Email Outlook

SebT — Fri, 15 May 2020 13:07:00 GMT

Awesome, will try it out! Thanks!

------------------------------
Seb T
------------------------------

RE: Flag Email Outlook

expertcr — Mon, 15 Jun 2020 11:58:00 GMT

Good morning

Just FYI our most recent version of MS Outlook VBO support flag email, this VBO is included in Blue Prism 6.8 and is work in the previous versiosn of BP.

Have a good day.

------------------------------
Luis Lopez
Customer Support Engineer English and Spanish
Blue Prism Ltd
------------------------------