This function returns the message with the specified ID.
object.LoadMessage(aId)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aId |
In, Required | int |
ID of the message |
Display the subject of the message, the date, when the message was sent and its destination.
Dim aMes
Dim aMessage
On Error Resume Next
Set aMes = Profile.LoadMessage(186)
if Err.Number <> 0 then
aMessage = "There is no message with the specified ID"
Err.Clear
else
aMessage = "The message '" & aMes.Subject & "' was sent to " &_
aMes.Destination & " on " & aMes.Sent
end if
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Messages can be found in
.