ISExternalProvider.Code

Description

The code used to refer to the external provider.

Syntax

object.Code

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

Return Value

string

Example

Display the code used to refer to the external provider.

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 & "Code:" & vbNewLine & vbNewLine &_
    aExtProvider.FullName & vbTab & aExtProvider.Code
end if
 
Profile.MsgBox(aMessage)
Note:

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

Version information

Added in v7.8.0