ISExternalProvider.Pager

Description

The external provider's pager.

Syntax

object.Pager

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

Return Value

string

Example

Display the external provider's pager.

Dim aExtProvider 
Dim aCode
Dim aMessage

aCode = "JT"
Set aExtProvider = Profile.LoadExternalProvider(aCode)

if aExtProvider.ID = 0  then 
  aMessage = "No external provider with the specified code" 
else
  aMessage = aMessage & vbNewLine &_
    "Full Name:" & vbTab & "Pager:" & vbNewLine & vbNewLine &_
    aExtProvider.FullName & vbTab & aExtProvider.Pager
end if
 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Pager can be found in Organisation > External Providers > Basic > General > Pager field.

Version information

Added in v7.8.0