TrackEvent

<< Clique para Mostrar o Sumário >>

 

TrackEvent

TrackEvent(EventMessage, [Comment], [EventTimeStamp])

Este método permite gerar eventos via script manualmente. Estes eventos podem ser gerados tanto no Elipse Power Viewer quanto no Servidor, e são registrados em uma tabela no banco de dados da aplicação.

Parâmetros do método TrackEvent

nome

Descrição

EventMessage

Contém a mensagem do evento, com um máximo de 200 caracteres

Comment

Contém comentários adicionais sobre um evento, com um máximo de 200 caracteres. Este parâmetro é opcional e, se omitido, assume uma String vazia

TimeStamp

Indica a data e hora em que um evento ocorreu. Este parâmetro é opcional e, se omitido, o Elipse Power assume a data e a hora atuais

 

Este método só registra os eventos caso a opção de Registro de Eventos nas Opções do Domínio esteja habilitada. Os eventos são registrados em uma tabela de um banco de dados, que é definida também nas configurações de Registro de Eventos.

Para mais informações sobre o Registro de Eventos do Domínio, consulte o Manual do Usuário do Elipse Power. O código a seguir contém um exemplo de uso deste método.

Sub Button1_Click()
  Dim Tag, User, Comment
  Set Tag = Application.GetObject("IO.Inputs.I001")
  If Application.ESign(Tag.PathName, , "Alteração do Valor", _
    Tag.Value, 1, User, Comment) Then
    If Tag.WriteEx(1) Then
      Application.TrackEvent _
        "Tag IO.Inputs.I001 alterado para 1 " &_
        "pelo usuário" & User, Comment
    End If
  End If
End Sub

Esta página foi útil?