Atualização Automática De Banco De Dados

[galvaosistemas]

Peço lhe desculpas pelo incomodo, mas a dias que venho pesquisando na web e enfim, mas não tem chegado a conclusão de uma ideia fixa.

 

Bom vou tentar esclarecer o que estou precisando.

 

E o seguinte estou desenvolvendo um projeto em multi-camadas usando datasnap, e a minha ideia que estou querendo colocar em pratica e a seguinte, um procedimento onde posso atualizar a base de dados no cliente, no caso somente a estrutura do banco de dados.

 

Tipo assim, voce sabe que quando estamos desenvolvendo toda hora praticamente mudamos ou criamos campos novos em nossas tabelas, ao atualizar o cliente, por esquecimento ou por nossas falhas esquecemos que houve mudança na estrutara do banco de dados, entao a minha ideia e criar algum procedimento que posso fazer isso de maneira automatica na minha propria aplicação, no meu caso eu tenho um aplicação chamada servidor onde ela e executado 24 horas/dia, e de tempo em tempo ela faz uma checagem no meu servidor FTP para verificar se existe uma verão nova disponivel, em relação aos meus exe's isso ja trabalha normalmente, so estou tendo dificuldades em termo da atualização do banco de dados.

 

Obsv.: O banco que estou utilizando e o Firebid

[sidnei_alves1]

Bom dia.

 

 

Aqui eu eu gero um script da mudança da base de dados eu adiciono um o script no exe, ao abrir o sistema verifica a versão da base e executo o script para atualização;.

[galvaosistemas]

Certo, a minha duvida em questao como e que posso gerar e executar esse script teria como mandar um exemplo

[Aurino]

GalvaoSistemas

 

Tente Assim:

procedure ATUALIZAR;
var F TextFile;
      bufer: string;
begin
   AssignFile(F, 'c:\seu_script.sql');
   Reset(F);
   Readln(F, buffer);
   while not eof(F) do
   begin
      with query1 do
      begin
         Active := False;
         SQL.Clear;
         SQL.Add(buffer);
         grava;
      end;   
      Readln(F, buffer);
   end;
   CloseFile(F);
end;

procedure SALVAR;
begin
      Try
         Database.StartTansaction;
         query1.ExecSQL;
         Database.Commit;
      except
          showmessage('Scritp instalado com sucesso.');
          Database.Rollback;
      end;
end;

Citar

Fonte: http://www.scriptbrasil.com.br/forum/topic/113885-resolvido%C2%A0fazer-atualiza%C3%A7%C3%A3o-no-banco-de-dados-sem-interferir-no/