|
<< 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