GARANTIR DESCONTO

Fórum Como fechar completamente um banco de dados? #291260

09/08/2005

0

Preciso terminar um formulário de restauração do Banco de Dados... e queria saber como fechar completamente o gdb por linha de código?

Alguém sabe algum comando que dê certo?


Wesley001

Wesley001

Responder

Posts

09/08/2005

Sistemald

qaul meio de acesso vc usa?
ibx, mdo, DBexpress?


Responder

Gostei + 0

09/08/2005

Wesley001

IBExpress


Responder

Gostei + 0

09/08/2005

Adriano Santos

Será q entendi?

SeuCompnenteIbDatabase.Connected := False;


Responder

Gostei + 0

09/08/2005

Wesley001

Não... mesmo com o Conected ele fala que o banco de dados está em uso, mesmo fechando o IBDatabase e o IBTransaction...

Ele somente não consegue efetuar a restauração por esse problema...

Dei Drop Database também e ele não consegue dropar o Banco e nem as tabelas.

E com close all datasets também dá o mesmo erro


Responder

Gostei + 0

09/08/2005

Adriano Santos

Caramba cara, nunca vi isso [b:dc73791c78]wesley001[/b:dc73791c78].
Vc tah usando em rede? Já se certificou que todos saíram do DB?


Responder

Gostei + 0

09/08/2005

Wesley001

Para ficar mais nítido vou passar o código:

//-----------------------------------------------------------

DMSisBaby.ibtSysBaby.Commit;
DMSisBaby.ibdbSisBaby.CloseDataSets;
DMSisBaby.ibdbSisBaby.Connected := False;
DMSisBaby.ibdbSisBaby.ForceClose;
DMSisBaby.ibdbSisBaby.Close;
DMSisBaby.ibtSysBaby.Active := False;
//É para fechar

ibrsSisBaby.DatabaseName.Add(edBDRestore.Text);
ibrsSisBaby.BackupFile.Clear;
ibrsSisBaby.BackupFile.Add(edBDBackup.Text);
try
sbRodape.Panels[0].Text := ´Restaurando o banco...Aguarde.´;
ibrsSisBaby.Active := true;
ibrsSisBaby.ServiceStart;
finally
ibrsSisBaby.Active := false;
messageBeep(0);
sbRodape.Panels[0].Text := ´Banco restaurado.´;
messagedlg(´O Banco será reconectado!´, mtInformation, [mbOK], 0);
dmSisBaby.ibdbSisBaby.Connected:=true;
DMSisBaby.ibdbSisBaby.Open;

//---------------------------------------------------------

Abraços a todos


Responder

Gostei + 0

10/08/2005

Wesley001

Ninguém pode me responder?

Só falta isso para terminar esse sistema.

Abraços a todos!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar