Program button for sensitivity

[mqcarpenter]

We use a PGP gateway and have need to tag emails as "Sensitivity:
Confidential" on a regular basis. This is annoying in the default
manner.

We created a macro to open a new message that is already tagged, but I
need more. I need to be able to change messages on reply to
confidential as well.

Really what I need is an option like the "high priority" icon available
in all possible situations. Is there a way to do this easily, or an add
on that could do it? I do not have a VBA or Outlook expert on staff to
turn to. TIA

 

[Michael Bauer]

Am 22 Mar 2006 10:06:11 -0800 schrieb (e-mail address removed):

The code could be like this:

Public Sub TurnIntoConfidential()
With Application.ActiveInspector
If TypeOf .CurrentItem Is Outlook.MailItem then
.CurrentItem.Sensitivity=olConfidential
Endif
End With
End Sub

Just open a message window, right click on the toolbar, select Macros from
the second tab and drag the listed name onto the toolbar.

 

[MQCarpenter]

Michael, thank you that works, however it does not identify that the
message is now tagged (i.e. high priority will change the icon when
active). Also, is there a way to change sensitivity on a reply message?
In other words, if it is sent unconfidential, but on reply I need to
make it confidential, can that status be changed somehow? By default it
will not allow this.