ISProvider.Phone2

Description

The provider's second telephone number.

Syntax

object.Phone2

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

Return Value

string

Example

Display the provider's second telephone 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 with the category '" &_
  aFilter.Category & "' is " & aProviders.Count

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

Profile.MsgBox (aMessage)  
Note:

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

Version information

Added in v7.8.0
Access changed to read/write in v7.8.0