ISLoadMessagesParams.OnlyUnread

Description

The unread messages.

Syntax

object.OnlyUnread

Part	Attribute	Type	Description
`object`	Required	ISLoadMessagesParams	The `object` always implements the ISLoadMessagesParams interface

Return Value

bool

Example

Display the number of messages loaded on the basis of the selected filter and the information about them.

Dim aProvider
Dim aFilter
Dim aMessages
Dim aMessage
Dim aInfo
Dim i

Set aProvider = Profile.LoadProvider("ADMIN")
set aFilter = Profile.CreateLoadMessagesParams(aProvider.Id)
aFilter.OnlyUnread = True 
set aMessages = Profile.LoadMessages(aFilter)

aInfo = "Messages Count = " & aMessages.Count
for i = 0 to aMessages.Count - 1  
  set aMessage = aMessages.Item(i)
  aInfo = aInfo & vbNewLine & "The message with the text '" & aMessage.Text &_
    "' was sent by " & aMessage.Sender & " on " & aMessage.Sent
next 

Profile.MsgBox(aInfo)

Note:

In Profile Client v8 on User Interface Unread Messages can be found in Organisation > Work Centre > Communication > Email > Inbox > View > Unread EMail.

Version information

Added in v7.8.0