ISExternalProvider.PostalAddress

Description

The postal address of the external provider.

Syntax

object.PostalAddress

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

Restriction: This property is readonly.

Return Value

ISAddress

Example

Display the postal address of the external provider.

Dim aExtProvider 
Dim aCode
Dim aExProvPostalAddress
Dim aMessage

aCode = "1"

Set aExtProvider = Profile.LoadExternalProvider(aCode)

if aExtProvider.ID = 0  then 
  Profile.MsgBox("No external provider with the specified code")
  exit sub   
end if

set aExProvPostalAddress = aExtProvider.PostalAddress
if aExProvPostalAddress is nothing then 
  aMessage = aMessage & vbNewLine & aExtProvider.FullName &_
    " has no street address"
else
  aMessage = aMessage & vbNewLine & aExtProvider.FullName &_
    "'s postal address: " & aExProvPostalAddress.AsLine 
end if
 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Postal Address can be found in Organisation > External Providers > Basic > General > Postal Address.

Version information

Added in v7.8.0