ISProfile.LookupPostCode

Description

This function opens the dialog window to load the postal code by the specified parameters.

Syntax

object.LookupPostCode(aSuburb, aCity, aCountryCode, aStateCode)

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface
`aSuburb`	In, Required	string	The suburb
`aCity`	In, Required	string	The city
`aCountryCode`	In, Required	string	The code of the country
`aStateCode`	In, Required	string	The code of the state

Return Value

ISPostCode

Returns the dialog window to load the postal code by the specified parameters.

Example

Display some information about the post code.

Dim aPostCode
Dim aMessage
  
Set aPostCode = Profile.LookupPostCode(" ", "Nelson", "NZL", " ")
if aPostCode is nothing then
  exit sub
end if
aMessage = _
  "Address 2: " & VbTab & aPostCode.Address2 & vbNewLine &_
  "Address 3: " & VbTab & aPostCode.Address3 & vbNewLine &_
  "Country Code: " & VbTab & aPostCode.CountryCode & vbNewLine &_
  "Post Code ID: " & VbTab & aPostCode.ID & vbNewLine &_
  "Latitude: " & VbTab & aPostCode.Latitude & vbNewLine &_ 
  "Longitude: " & VbTab & aPostCode.Latitude & vbNewLine &_    
  "Postal Code: "  & VbTab & aPostCode.PostalCode & vbNewLine &_
  "State Code: "  & VbTab& aPostCode.StateCode & vbNewLine   

Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Post Code can be found in Maintain > Post Codes > Post Codes.

Version information

Added in v7.8.0