ISExternalProvider.EDIPrivateKey

Description

The external provider's EDI private key.

Syntax

object.EDIPrivateKey

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

Return Value

string

Example

Display the external provider's EDI private key.

Dim aExtProvider 
Dim aCode
Dim aMessage

aCode = "1"
Set aExtProvider = Profile.LoadExternalProvider(aCode)

if aExtProvider.ID = 0  then 
  aMessage = "No external provider with the specified code" 
else
  aMessage = aMessage & vbNewLine &_
    "Full Name:" & vbTab & "EDI Private Key:" & vbNewLine & vbNewLine &_
    aExtProvider.FullName & vbTab & aExtProvider.EDIPrivateKey
end if
 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface EDI Private Key can be found in Organisation > External Providers > Basic > Reference > EDI Private key field.

Version information

Added in v7.8.0