The external provider's EDI public key.
object.EDIPublicKey
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISExternalProvider interface |
string
Display the external provider's EDI public 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 Public Key:" & vbNewLine & vbNewLine &_
aExtProvider.FullName & vbTab & aExtProvider.EDIPublicKey
end if
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface EDI Public Key can be found in
.