The code of the alias assigned to the external provider.
object.AliasCode
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISExternalProvider interface |
string
Display the code of the alias assigned to the external provider.
Dim aExtProvider
Dim aCode
Dim aMessage
aCode = "1"
Set aExtProvider = Profile.LoadExternalProvider(aCode)
if aExtProvider.ID = 0 then
aMessage = "No external provider with the specified code"
else
aMessage = aMessage & vbNewLine &_
"Full Name: " & aExtProvider.FullName & vbNewLine &_
"Alias Code: " & aExtProvider.AliasCode
end if
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Alias Code can be found in
.