ISProvider.PostalAddress

Description

The postal address of the provider.

Syntax

object.PostalAddress

Part Attribute Type Description
object Required
The object always implements the ISProvider interface
Restriction: This property is readonly.

Return Value

ISAddress

Example

Display the postal address of the provider.

Dim aFilter 
Dim aProviders
Dim aProvider
Dim aPostalAddress
Dim aMessage

Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 2 'pcProvider
set aProviders = Profile.LoadProvidersByFilter(aFilter)

aMessage = aMessage & vbNewLine &_
  "The number of the providers is " & aProviders.Count

for each aProvider in aProviders
  set aPostalAddress = aProvider.PostalAddress
  if aPostalAddress is nothing then
    aMessage = aMessage & vbNewLine & aProvider.FullName &_
      " --- No Postal Address" 
  else
    aMessage = aMessage & vbNewLine & aProvider.FullName &_
      " / Postal Address: " & aPostalAddress.AsLine 
  end if    
next
 
Profile.MsgBox (aMessage)  
Note:

In Profile Client v8 on User Interface Postal Address can be found in Organisation > People&Places > People and Places > Open the selected Provider > General > Postal Address.

Version information

Added in v7.8.0