Fórum Como fechar completamente um banco de dados? #291260
09/08/2005
0
Alguém sabe algum comando que dê certo?
Wesley001
Curtir tópico
+ 0Posts
09/08/2005
Sistemald
ibx, mdo, DBexpress?
Gostei + 0
09/08/2005
Wesley001
Gostei + 0
09/08/2005
Adriano Santos
SeuCompnenteIbDatabase.Connected := False;
Gostei + 0
09/08/2005
Wesley001
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
Gostei + 0
09/08/2005
Adriano Santos
Vc tah usando em rede? Já se certificou que todos saíram do DB?
Gostei + 0
09/08/2005
Wesley001
//-----------------------------------------------------------
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
Gostei + 0
10/08/2005
Wesley001
Só falta isso para terminar esse sistema.
Abraços a todos!
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)