[firebase-br] Backup

[Lucius Magliano]

Levy , a gente muda as coisas e nem lebra olha só eu já havia mudado de Gbak
pra componente mesmo ... o IBBackupService  e IBRestoreService tem função e
opções pra caraca ... meu botão de backup ficou assim :


procedure TForm1.btnBackupClick(Sender: TObject);
begin
 //muda para a página de Backup
  PageControl1.ActivePage:= tbsBackup;

  Screen.Cursor:= CrHourGlass;
  memBackup.Lines.Clear;
    with IBbackupService1 do
  begin
    //Define o nome do servidor do banco de dados
    ServerName:= edtServerName.Text;

    //Define o protocolo da rede
    case rgpProtocol.ItemIndex of

      0: Protocol:= TCP;
      1: Protocol:= Local;
    end;
      //Configura os parâmetros do Backup
    LoginPrompt:= False;
    Params.Clear;
    Params.Values['user_name']:= edtUsuario.Text;
    Params.Values['password']:= edtSenha.Text;

    //Ativa verbose para mostrar informações do processo de backup
    Verbose := True;

    //Configura as opções de Backup
    Options:= [];
    if cbxNonTransportable.Checked then
      Options:= Options + [NonTransportable];
    if cbxIgnoreLimbo.Checked then
      Options:= Options + [IgnoreLimbo];
    if cbxMetadataOnly.Checked then
      Options:= Options + [MetadataOnly];
    if cbxNoGarbageCollection.Checked then
      Options:= Options + [NoGarbageCollection];
    if cbxIgnoreChecksums.Checked then
      Options:= Options + [IgnoreChecksums];
    if cbxOldMetadataDesc.Checked then
      Options:= Options + [OldMetadataDesc];
    if cbxConvertExtTables.Checked then
      Options:= Options + [ConvertExtTables];

    //Configura as propriedades de Backup
    DatabaseName:= edtBackupDatabaseName.Text;
    BackupFile.Clear;
    BackupFile.Add(edtBackupFile.Text);
    try
      try
        Active:= True;

        //Inicia a operação
        ServiceStart;

        //Lista os processo no Memo
        while not Eof do
          memBackup.Lines.Add(GetNextLine);
      except
        on e: exception do
        begin
          memBackup.Lines.Add('Erro: ' + e.Message);
        end;
      end;
    finally
      Active:= False;
      Screen.Cursor:= CrDefault;
    end;
  end;
end;

Em 23 de março de 2010 11:11, Levy Moreira <levymoreiraleite em gmail.com>escreveu:

> Se num for pedi d +, num dava pra mostrar o código de como fazer isso?
>
> Em 23 de março de 2010 08:31, Lucius Magliano
> <lucius.magliano em gmail.com>escreveu:
>
> > ei fiz um aplicativo que executa o gbak e  zipa ele com bkDDMMAA ( data )
> >  ... é só usar as funções de shell do delphi
> > :)
> >
> >
> > Em 22 de março de 2010 14:36, Humberto Araujo <humberto701 em gmail.com
> > >escreveu:
> >
> > > Tenho conhecimento ate o momento que a ferramenta Gbak serve para
> > realizar
> > > o
> > > backup.
> > >
> > > Gostaria de saber a forma mais utilizada por vocês, e saber se fazem o
> > > backup direto da aplicação.. e como é realizado se for na aplicação.
> > > ______________________________________________
> > > FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> > > Para saber como gerenciar/excluir seu cadastro na lista, use:
> > > http://www.firebase.com.br/fb/artigo.php?id=1107
> > > Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> > >
> >
> >
> >
> > --
> >  \!/  Antes de imprimir pense em sua Responsabilidade e compromisso com o
> > MEIO AMBIENTE!
> > ______________________________________________
> > FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> > Para saber como gerenciar/excluir seu cadastro na lista, use:
> > http://www.firebase.com.br/fb/artigo.php?id=1107
> > Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> >
>
>
>
> --
> Levy Moreira
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>



-- 
 \!/  Antes de imprimir pense em sua Responsabilidade e compromisso com o
MEIO AMBIENTE!