ISProvider.LoadAlias

Description

This function returns the provider's alias with the specified code or creates it if the alias does not exist.

Syntax

object.LoadAlias(aCode)

Part	Attribute	Type	Description
`object`	Required	ISProvider	The `object` always implements the ISProvider interface
`aCode`	In, Required	string	The code of the provider's alias

Return Value

ISProviderAlias

Returns the provider's alias with the specified code.

Example

Display the provider's alias with the specified code.

Dim aFilter 
Dim aProviders, aProvider
Dim aAliasCode
Dim aMessage
Dim aProviderAlias

aAliasCode = "MSP2"

Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 2 'pcProvider  

set aProviders = Profile.LoadProvidersByFilter(aFilter)

for each aProvider in aProviders 
  set aProviderAlias = aProvider.LoadAlias(aAliasCode)
  aProviderAlias.Reference1 = "11111111111111"
  aProvider.Save
  aMessage = aMessage & vbNewLine & aProvider.FullName &_
      " has alias with code " & aAliasCode
next  
 
Profile.MsgBox (aMessage)

Note:

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

Version information

Added in v7.8.0