Foros Club Delphi - Estado de un servidor

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - Estado de un servidor (https://www.clubdelphi.com/foros/showthread.php?t=74)

Estado de un servidor

Hola a todos, alguien sabra como conocer el estado de un servidor sql server 7, la idea es que cuando aparezca la forma de usuario y password en un statusbar poner algo asi como estado del servidor on / off
Esto es para saber si el servidor esta arriba antes de meter el usuario/password, ademas lo necesito usar en un modulo administrativo para saber que servidores estan prendidos y cuales apagados.
trabajo con sql server 7, ADO y delphi 6

prueba esto

Código:

function ServidorDisponible (connection : TADOConnection) : Boolean;

begin

         try

                connection.Open;

                result := True;

         except

                   Result := False;

         end;

end;

Hola...

Código:

function ServidorDisponible (connection : TADOConnection) : Boolean;

begin

        try

                connection.Open;

                result := True;

         except

                   Result := False;

         end;

end;

haciendo una variacion al codigo de marcost:

Código:

function ServidorDisponible (connection : TADOConnection) : Boolean;

begin

        try

        if not connection.connected then        

              connection.Open;

                result := True;

         except

                   Result := False;

         end;

end;

y este codigo agregalo a un action list.... y en el evento ONIDLE... un action por cada servidor....

esto lo comprobaria a cada momento....

bueno nadama seria el connection.connected ( u otra porpiedad que mustre el estado de si esta conectado o no, no la recuerdo y no tengo delphi a la mano)

espero hbaer ayuado un poco