This function returns the entities of the organisation node with the specified source.
object.GetEntityIdBySource(aSource)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISOrgMember interface |
|
aSource |
In, Required | string |
The entity source |
Add the entities with the source "My source 1" to the organisation node. Get the entities with the specified source and display their count.
Dim aFilter
Dim aOrgMembers
Dim aOrgMember
Dim aEntityCollection
Dim aMessage
Set aFilter = Profile.CreateOrgMembersFilter
set aOrgMembers = Profile.LoadOrgMembers(aFilter)
aMessage = aMessage & vbNewLine &_
"The number of the org nodes is " & aOrgMembers.Count
for each aOrgMember in aOrgMembers
aOrgMember.AddEntityId "My source 1", "My identifier", "My value A"
aOrgMember.AddEntityId "My source 2", "My identifier", "My value B"
set aEntityCollection = aOrgMember.GetEntityIdBySource ("My source 1")
aMessage = aMessage & vbNewLine & aOrgMember.Name &_
" has " & aEntityCollection.Count & " linked entities "
next
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Entity Source can be found in
.