Outlook set sensitivity level

[Rallig]

Hello,

I tried to make a new appointment if I use a button. That's no problem.
But the appointment must have a sensitivity level (I prefered "private" )

specci48 told me, it is not a part of the outlook.dll.

Does anyone know a workaround ... or is it possible to implement the sensitivity level into the outlook.dll ?

Greetings
Rallig

 

[Erel]

It is possible using the Door library:

'obj is an Object, App is an Appointment and AppCol is a PimCollection
Sub App_Start
    App.New1
    App.CreateNew
    AppCol.New1("Appointments")
    App.Start = Now
    App.Duration = 30
    App.Subject = "Test"
    If CPPC Then
        obj.New1(false)
        obj.Value = App.Value
        obj.SetProperty("Sensitivity","Private") 'Private / Confidential / Normal / Personal
    End If
    AppCol.AddItem(App.Value)
End Sub

 

[Rallig]

Superb, thank you

 

[Rallig]

:sign0013: , but let me allow one additional question.

What is the meaning of "IF CPPC then" ?

 

[Erel]

cPPC is true on the device and false on the desktop.
This code will raise an error on the desktop so cPPC is used to distinguish between the two platforms.

 

[Rallig]

nice to know, thank you