This function returns the organisational members loaded on the basis of the selected filter.
object.LoadOrgMembers(aFilter)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aFilter |
In, Required | The object that defines conditions for
filtering |
Display the number of the organisational members and their names.
Dim aFilter
Dim aOrgMember
Dim aOrgMembers
Dim aMessage
Set aFilter = Profile.CreateOrgMembersFilter
aFilter.Code = "AUTO9"
set aOrgMembers = Profile.LoadOrgMembers(aFilter)
aMessage = "Org Members Count = " & aOrgMembers.Count
for i = 0 to aOrgMembers.Count - 1
set aOrgMember = aOrgMembers.Item(i)
aMessage = aMessage & vbNewLine & "The name of the organisational member is " &_
aOrgMember.Name
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Org Members can be found in
.