This function returns the external provider with the specified ID.
object.LoadExternalProviderById(aId)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aId |
In, Required | int |
ID of the external provider |
Display the full name and the code of the external provider.
Dim aExProvider
Dim aMessage
On Error Resume Next
Set aExProvider = Profile.LoadExternalProviderById(446)
if Err.Number <> 0 then
aMessage = "There is no external provider with the specified ID"
Err.Clear
else
aMessage = aExProvider.FullName & " (" & aExProvider.Code & ")"
end if
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface ID cannot be found, but External Provider can be and found in
.