[firebase-br] Erro ao executar o GStat

Jeferson Oliveira jefersonfoliveira em gmail.com
Qua Jul 25 23:30:51 -03 2007


Valdemir wrote:
> tem alguma maneira de pegar o ODS de um banco remotamente ?
> usando o IBO?

Do IBO eu quase nada sei, mas com Delphi, utilizando IBX, o código 
abaixo dá conta do recado:

uses
   IBDatabase, IBDatabaseInfo;

function ObterODS(dbVerificar: TIBDatabase): string;
var
   IBDatabaseInfo: TIBDatabaseInfo;
begin
   IBDatabaseInfo := TIBDatabaseInfo.Create(nil);
   try
     IBDatabaseInfo.Database := dbVerificar;
     Result := Format('%s.%s', [IntToStr(IBDatabaseInfo.ODSMajorVersion),
                                IntToStr(IBDatabaseInfo.ODSMinorVersion)]);
   finally
     IBDatabaseInfo.Free;
   end;
end;


Abraço!
Jeferson Oliveira


Enviado pelo Mozilla Thunderbird
http://br.mozdev.org/thunderbird





Mais detalhes sobre a lista de discussão lista