BANCO ON LINE OU NAO
Como posso verificar se o banco de dados esta on Line ou nao, ja coloquei um timer no form principal q faz a verificacao pelo adStateOpen, mas ele nao mostra que esta off caso eu pare o banco de dados, estou usando sql server
Desde Ja agradeço
Desde Ja agradeço
Usa isso:
Dim Conexao As New Adodb.Connection
Conexao.Open [Ô]SUA_STRING_CONEXAO[Ô]
If Conexao.State = 1 Then
MsGBox [Ô]Conectado![Ô]
Else
MsGBox [Ô]Desconectado![Ô]
End if
Dim Conexao As New Adodb.Connection
Conexao.Open [Ô]SUA_STRING_CONEXAO[Ô]
If Conexao.State = 1 Then
MsGBox [Ô]Conectado![Ô]
Else
MsGBox [Ô]Desconectado![Ô]
End if
O que eu procuro é deixar a conexao aberta e sem ter q executar uma pesquisa ela me demonstrar que esta desconectada.
Então, use o [Ô]On Error[Ô]
Se [Ô]der pau[Ô], é que ta fechada...claro, analisando o número do erro que retorna (Err.Number)
Se [Ô]der pau[Ô], é que ta fechada...claro, analisando o número do erro que retorna (Err.Number)
Tópico encerrado , respostas não são mais permitidas