ISProvider.Pager

Description

The provider's pager.

Syntax

object.Pager

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

Return Value

string

Example

Display the provider's contact number.

Dim aFilter 
Dim aProviders
Dim aProvider
Dim aMessage

Set aFilter = Profile.CreateProvidersFilter

aFilter.Category = 2 'pcProvider  

set aProviders = Profile.LoadProvidersByFilter(aFilter)
aMessage = aMessage & vbNewLine &_
  "The number of the providers is " & aProviders.Count

aMessage = aMessage & vbNewLine &_
  "Full Name:" & vbTab & "Pager:"
for each aProvider in aProviders 
  aMessage = aMessage & vbNewLine &_
    aProvider.FullName & vbTab &_
    aProvider.Pager
next

Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Pager can be found in Organisation > People&Places > People and Places > Open the selected Provider > General > Pager field.

Version information

Added in v7.8.0

Access changed to read/write in v7.8.0