This filter property is used to load the collection of providers with the specified code.
object.Code
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProvidersFilter interface |
string
Display the number of the providers loaded on the basis of the selected filter, their full names and IDs.
Dim aFilter
Dim aProviders
Dim aProvider
Dim aMessage
Set aFilter = Profile.CreateProvidersFilter
aFilter.Code = "VE3"
Set aProviders = Profile.LoadProvidersByFilter(aFilter)
aMessage = vbNewLine &_
"The number of the providers with the specified code (" &_
aFilter.Code & ") 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)
In Profile Client v8 on User Interface Code can be found in
or .