Determina o estado da conexão com o servidor OPC. Esta propriedade é somente de leitura. As opções disponíveis estão descritas na tabela a seguir.
Opções disponíveis para ServerStatus
Opção |
Descrição |
|---|---|
-1 - ServerStatus_Unknown |
O Driver de Comunicação OPC está conectado ao servidor OPC mas o estado não é informado ou o cliente OPC possui a propriedade ReconnectPeriod configurada em zero (padrão) |
0 - ServerStatus_NotConnected |
O Driver de Comunicação OPC não está conectado ao servidor OPC. Isto acontece quando, por exemplo, o Driver de Comunicação OPC não está ativo, ou a conexão não foi estabelecida por algum problema qualquer |
Os valores a seguir são informados apenas quando a propriedade ReconnectPeriod é diferente de 0 (zero). Esta passagem de período especificando o estado é buscada no servidor. Caso o estado não seja informado corretamente, a propriedade pode manter o valor igual a -1 (menos um), ou a desconexão pode ser detectada neste caso, levando a propriedade ServerStatus para 0 (zero). Os valores são baseados nos cinco estados padrão definidos para servidores OPC.
Opções disponíveis para ReconnectPeriod diferente de zero
Opção |
Descrição |
|---|---|
1 - ServerStatus_Running |
O servidor está executando normalmente |
2 - ServerStatus_Failed |
O servidor não está executando. Um erro não especificado ocorreu no servidor |
3 - ServerStatus_NoConfig |
O servidor está executando, porém sem informações de configuração |
4 - ServerStatus_Suspended |
O servidor foi suspenso temporariamente |
5 - ServerStatus_Test |
O servidor está em modo de teste |
Exemplo:
Sub CommandButton1_Click()
Dim status
status = Application.GetObject("DriverOPC1").ServerStatus
MsgBox "O status do driver é " & status
Select Case status
Case -1
MsgBox "O DriverOPC está conectado ao servidor OPC_
mas seu estado não foi informado."
Case 0
MsgBox "O DriverOPC não está conectado ao servidor OPC"
Case 1
MsgBox "O servidor está rodando normalmente"
Case 2
MsgBox "O servidor não está rodando"
Case 3
MsgBox "O servidor está rodando mas sem_
informações de configuração"
Case 4
MsgBox "O servidor foi suspenso temporariamente"
Case 5
MsgBox "O servidor está em Modo de Testes"
End Select
End Sub
NOTA |
Para obter o comportamento equivalente a uma propriedade Booleana, o recomendado é usar ServerStatus diferente de 0 (zero). Isto basicamente diferencia apenas entre haver a conexão ou não, desconsiderando estados mais específicos do servidor. Além disto, a expressão independe do uso da propriedade ReconnectPeriod diferente de 0 (zero). |