RetrieveDefinition Method Example

The following example retrieves the definitions contained in a tag group file.

Dim sTokenList() as String, TokenList as Variant

Dim sReplacementList() as String, ReplacementList as Variant

Dim sDescriptionList() as String, DescriptionList as Variant

' Create the tag group file object

Dim TGD As Object

Set TGD = CreateObject("TagGroupDefinitionInterfaceDll.TagGroupDefinitionInterface")

TGD.RetrieveDefinition "Test", 2, TokenList, ReplacementList, DescriptionList