[firebase-br] Como saber a versão do FB (1.0, 1.5, 2.0)?

Jeferson Oliveira jefersonfoliveira em gmail.com
Dom Fev 17 16:39:45 -03 2008


Em 16/02/08, Juvencio Leite escreveu:
> Bom Dia Lista, tem alguma forma de saber qual e a versão do Firebird
> (1.0, 1.5, 2.0) que esta rodando na maquina do cliente?

Pelo DOS, pode obter essa informação com GBAK.

Pelo servidor basta:
gbak -z

Pela estação pode obter essa informação atavés da execução de um
backup. É claro que não quer executar o backup completo só para isso,
então passe um caminho de destino inválido como parâmetro:

gbak -z -b servidor:c:\CaminhoValido\ParaBancoExistente.fdb
C:\CaminhoInvalido\Banco.fbk


Se utiliza Delphi, pode utilizar a classe TIBServerProperties. Veja um exemplo:

uses
  IBServices;

function ObterVersaoServidor(const Servidor: string; const Usuario: string =
    'SYSDBA'; const Senha: string = 'masterkey'): string;
var
  IBServerProperties: TIBServerProperties;
begin
  IBServerProperties := TIBServerProperties.Create(nil);
  try
    IBServerProperties.ServerName := Servidor;
    IBServerProperties.LoginPrompt := False;
    IBServerProperties.Params.Add(Format('user_name=%s', [Usuario]));
    IBServerProperties.Params.Add(Format('password=%s', [Senha]));
    IBServerProperties.Active := True;
    try
      IBServerProperties.Options := IBServerProperties.Options + [Version];
      IBServerProperties.FetchVersionInfo;
      Result := Format('%s %s %d',
[IBServerProperties.VersionInfo.ServerVersion,
        IBServerProperties.VersionInfo.ServerImplementation,
        IBServerProperties.VersionInfo.ServiceVersion]);
    finally
      IBServerProperties.Active := False;
    end;
  finally
    IBServerProperties.Free;
  end;
end;


Abraço!
Jeferson Oliveira




Mais detalhes sobre a lista de discussão lista