ISProfile.CreateExtractsFilter

Description

This function creates the filter for loading extracts.

Syntax

object.CreateExtractsFilter()

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface

Return Value

ISExtractsFilter

Returns the filter for loading extracts.

Example

Display the number of the extracts loaded on the basis of the selected filter and their types.

Dim pFilter
Dim aExtracts
Dim aExtract
Dim aMessage

set pFilter = Profile.CreateExtractsFilter
pFilter.ForProvider = "ADMIN"
set aExtracts = Profile.LoadExtracts(pFilter)

aMessage = "Extracts Count = " & aExtracts.Count
for i = 0 to aExtracts.Count - 1
  set aExtract = aExtracts.Item(i)
  aMessage = aMessage & vbNewLine & aExtract.ExtractType
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Extracts cannot be found.

Version information

Added in v7.8.0