Obter informações de links do tipo IOTag via script

Gostaria de saber se é possível obter informações de um link em propriedades do tipo IOTag. No caso, minha dúvida se aplica a todas as propriedades cujo ícone do link de associação é igual a uma “corrente”.

image

Sub Foo()
   Dim link
   Dim str
   Dim xo

   Set xo = Application.GetObject("dados.xobject1")
   ' xo                                                             '
   ' |__ Blink Boolean < "dados.internaltag1"                       '
   ' |__ Tag   IOTag   ∞ "driver.tag1"                              '

   str = ""

   For Each link In xo.Links
       str = str & link.Property & " >> " & link.Source & vbNewLine
   Next

   ' O retorno de str sera somente:                                 '
   ' Blink >> False                                                 '
   MsgBox str
End Sub
1 Like

Leandro,

Os chamados “links indiretos” de ElipseX, ou associações de propriedades do tipo objeto, não existem na coleção “Links”.

Para obter a fonte desse tipo de associação em runtime você pode usar a propriedade Pathname. Por exemplo:

MsgBox xo.Tag.Pathname

2 Likes