ISProvidersFilter.ToDOB

Description

This filter property is used to load the collection of providers till the specified date of birth.

Syntax

object.ToDOB

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

Return Value

DateTime

Example

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

Dim aFilter 
Dim aProviders
Dim aProvider
Dim aMessage

Set aFilter = Profile.CreateProvidersFilter

aFilter.ToDOB = #12/23/1990#

Set aProviders = Profile.LoadProvidersByFilter(aFilter)

aMessage = vbNewLine &_
  "The number of the providers loaded till the specified DOB (" &_
  aFilter.ToDOB  & ") is " & aProviders.Count
  
aMessage = aMessage & vbNewLine & vbNewLine &_
  "Full Name:" & vbTab & "ID:" & vbTab & "DOB:"

for each aProvider in aProviders 
  aMessage = aMessage & vbNewLine &_
    aProvider.FullName & vbTab &_
    aProvider.ID & vbTab &_
    aProvider.DOB 
next

Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface DOB can be found in Organisation > People & Places > People and Places > Open the selected Provider > Basic > Internet > DOB field.

Version information

Added in v7.8.0