ISExternalProvider.GetRegistryKeys

Description

This function returns the registry keys of the external provider.

Syntax

object.GetRegistryKeys()

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

Return Value

ISList

Returns the registry keys of the external provider.

Example

Display the number of the external provider's registry keys.

Dim aExtProvider
Dim aCode
Dim aAllRegKeys
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 aAllRegKeys = aExtProvider.GetRegistryKeys   
aMessage = aExtProvider.FullName & " has  " & aAllRegKeys.Count &_
  " registry key(s)"  
 
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Registry Keys can be found in Organisation > External Providers > Basic > Registry.

Version information

Added in v7.8.0