ISProvider.Initials

Description

The provider's initials.

Syntax

object.Initials

Part Attribute Type Description
object Required
The object always implements the ISProvider interface
Restriction: This property is readonly.

Return Value

string

Example

Display the provider's initials.

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 & "Initials:"
for each aProvider in aProviders 
  aMessage = aMessage & vbNewLine &_
    aProvider.FullName & vbTab &_
    aProvider.Initials
next

Profile.MsgBox (aMessage)  
Note:

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

Version information

Added in v8.4.0