ISProvidersFilter.AreaOfInterest

Description

This filter property is used to load the collection of providers with the specified area of interest.

Syntax

object.AreaOfInterest

Part Attribute Type Description
object Required
The object always implements the ISProvidersFilter interface

Return Value

ISShortCode

Example

Display the number of the providers loaded on the basis of the selected filter, their full names and IDs.

Dim aFilter 
Dim aShortCode
Dim aProviders
Dim aProvider
Dim aMessage

set aShortCode = Profile.LoadShortCodebyCodeSCTName("TESTINT", "Areas of Interest")
set aFilter = Profile.CreateProvidersFilter

aFilter.AreaOfInterest = aShortCode

Set aProviders = Profile.LoadProvidersByFilter(aFilter)

aMessage = vbNewLine & "The number of the providers " &_
  "with the specified area of interest (" & aFilter.AreaOfInterest.Description &_
  ") is " & aProviders.Count
  
aMessage = aMessage & vbNewLine & vbNewLine &_
  "Full Name:" & vbTab & "ID:"  

for each aProvider in aProviders 
  aMessage = aMessage & vbNewLine &_
    aProvider.FullName & vbTab &_
    aProvider.ID  
next
Profile.MsgBox (aMessage)  
Note:

In Profile Client v8 on User Interface Area Of Interest can be found in Organisation > People & Places > People and Places > Open the selected Provider > Basic > Internet > Areas of Interest.

Version information

Added in v7.8.0