Angel Master


Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
Publicado: Mar 31 Ene, 2017 10:00 am Asunto: Problemas con TIBRestoreService |
|
|
Tengo este código para restaurar un BB.DD. hecha con FB 2.5:
| Código: | try
{
Query1->Transaction->Active = false;
Afiliados->Connected = false;
IBRestoreService1->LoginPrompt = false;
IBRestoreService1->Params->Add("user_name=sysdba");
IBRestoreService1->Params->Add("password=masterkey");
IBRestoreService1->DatabaseName->Add(Afiliados->DatabaseName);
IBRestoreService1->BackupFile->Add(pItem->SubItems->Strings[2]);
IBRestoreService1->Active = true;
IBRestoreService1->ServiceStart();
while (IBRestoreService1->IsServiceRunning)
Memo1->Lines->Add(IBRestoreService1->GetNextLine());
}
__finally
{
IBRestoreService1->Active = false;
Afiliados->Connected = true;
Query1->Transaction->Active = true;
} |
La copia de seguridad la elijo a partir de TListView en el que muestro las que hay guardadas. El problema aparece al comenzar a restaurarse el fichero, en cuanto se ejecuta por primera vez el while. Me da este error:
El error, al menos así lo interpreto, parece indicar que la base de datos está en uso ¡cuando acabo de cerrarla al inicio del proceso! _________________ Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|