ID of the concept for the type of the external provider.
object.Type_
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISExternalProvider interface |
int
Display the name and code of the concept of the external provider's type.
Dim aExtProvider
Dim aCode
Dim aConcept
Dim aMessage
aCode = "B0101"
Set aExtProvider = Profile.LoadExternalProvider(aCode)
if aExtProvider.ID = 0 then
aMessage = "No external provider with the specified code"
else
set aConcept = Profile.ProfileInternal.LoadConcept(aExtProvider.Type_)
aMessage = aMessage & vbNewLine &_
"FULL NAME: " & aExtProvider.FullName & vbNewLine &_
"TYPE: " & aConcept.Name & " (" & aConcept.Code & ")"
end if
Profile.MsgBox(aMessage) In Profile Client v8 on User Interface Type_ can be found in .