ArchiveFilter.AddArchiveVariable



AddArchiveVariable(ArchiveVariable As ArchiveVariable) As Boolean

Parameters

ArchiveVariable As ArchiveVariable
"ArchiveVariable" object that should be added to the filter.
ED
not used
RT
avaliable

Remarks

Adds an existing archive variable ("ArchiveVariable" object) to the filter. Thus, the data of the variable will be returned after the filtering.

Sample

The following code initiates that all assigned archive variables will be added to the archive filter. 

Sub zenOn_AddArchiveVariable(ByRef zArchive As Archive)
	'Declarations
	Dim zArFilter As ArchiveFilter
	Dim i As Integer

	'Initialize zArFilter by creating a new archive filter
	Set zArFilter = zArchive.ArchiveFilters.CreateArchiveFilter

	'Every archive variable within the collection...
	For i = 0 To zArchive.ArchiveVariables.Count - 1
		'... will be added to the archive filter
		zArFilter.AddArchiveVariable zArchive.ArchiveVariables.Item(i)
		'Output the name of the added variable
		Debug.Print "Variable """ & zArchive.ArchiveVariables.Item(i).Name & """ added!"
	Next i

End Sub

See Also

ArchiveFilter, ArchiveVariable