The privacy for the the message (to restrict access to the message to members of the selected role only).
object.Privacy
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISMessage interface |
string
Display the number of the messages loaded on the basis of the selected filter, their subjects and privacy.
Dim aProvider
Dim aParams
Dim aMessages
Dim aMessage
Dim aInfo
Dim i
Set aProvider = Profile.LoadProvider("ADMIN")
set aParams = Profile.CreateLoadMessagesParams(aProvider.Id)
aParams.ProviderId = aProvider.Id
aParams.SentAfter = #11/11/2019#
set aMessages = Profile.LoadMessages(aParams)
aInfo = "Messages Count = " & aMessages.Count
for i = 0 to aMessages.Count - 1
set aMessage = aMessages.Item(i)
aInfo = aInfo & vbNewLine & aMessage.Subject & " --- " & aMessage.Privacy
next
Profile.MsgBox(aInfo)
In Profile Client v8 on User Interface Privacy can be found in
.