| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
JesúsGandia
Master
Registrado: 17 Jul 2004Mensajes: 403Ubicación: Gandia, Valencia
|
 Publicado: Mie 01 Jun, 2005 4:49 pm Asunto: Hacer copias de seguridad de INTERBASE 7 CON BUILDER 6 |
 |
|
Tengo el componente "IBBackupService", el cual creo que es para hacer copias de seguridad de mi base de datos. El problema es que no sé como configurarlo ni como ejecutarlo mediante codigo, me podeis ayudar por favor. El nombre de mi base de datos es BAR.GDB. Y ya que estoy y si alguien lo save tambien me podria decir de paso como utilizo y como ejecuto con codigo la restauracion con el componente "IBRestoreService".
Muchisimas gracias por vuestras sugerencias. Lo necesito saver con urgencia. |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
| Publicado: Jue 02 Jun, 2005 4:17 am Asunto: |
|
|
Respaldo
| Código: | this->IBBackupService1->Attach();
this->IBBackupService1->DatabaseName = "ruta/BAR.GDB";
this->IBBackupService1->BackupFile->Add("ruta/BAR.bak");
this->IBBackupService1->Active=true; //activamos el servicio
this->IBBackupService1->ServiceStart(); // iniciamos el respaldo
ShowMessage("Respaldo Realiado con Exito"); //indicamos al usario |
Restauracion.
| Código: | // restauramos
this->IBRestoreService1->Attach();
this->IBRestoreService1->Options << Replace;
this->IBRestoreService1->DatabaseName = "ruta/BAR.GDB"; // nombre de la base
this->IBRestoreService1->BackupFile->Add("ruta/BAR.GDK"); // archivo backup
this->IBRestoreService1->Params->Add("user_name=SYSDBA");
this->IBRestoreService1->Params->Add("password=masterkey");
this->IBRestoreService1->Active = true;
this->IBRestoreService1->ServiceStart(); //iniciamos la restauracion
ShowMessage("Restauracion realizad con exito");
|
_________________
 |
|
| Volver arriba |
|
|
JesúsGandia
Master
Registrado: 17 Jul 2004Mensajes: 403Ubicación: Gandia, Valencia
|
| Publicado: Jue 02 Jun, 2005 4:00 pm Asunto: Perfecto |
|
|
Muchísimas gracias Cesar por tu ayuda, funciona perfectamente, aunque creo que no era necesario decir que para hacer la restauración había que cerrar antes la BDD.
He hecho algunas modificaciones, como luego quitar de las "Opciones" a "Replace".¿Es correcto?
En el nombre de la base de datos creo que se te olvidó poner "->Add()".
Por otra parte me podrías decir como quito rutas que anteriormente he puesto con “Add()” en BackupFile->Add(“ruta”). Después de todo, mi código ha quedado así y funciona perfectamente. Otra vez mil gracias.
| Código: |
MDatos->IBDatabase->Close();
MDatos->IBBSTPV->Attach();
//Para poner el nombre de las rutas,los usuarios y las claves
MDatos->IBBSTPV->DatabaseName->Add("D:\Curso\TPV-Virtual\Datos\TPV.GDB");
MDatos->IBBSTPV->BackupFile->Add("D:\Curso\TPV-Virtual\Datos\TPV.BDD");
MDatos->IBBSTPV->Params->Add("user_name=SYSDBA");
MDatos->IBBSTPV->Params->Add("password=masterkey");
MDatos->IBBSTPV->Active = true;// activamos el servicio
MDatos->IBBSTPV->ServiceStart();// iniciamos la copia de seguridad
ShowMessagePos("Copia realizada con Exito",350, 300);
MDatos->IBBSTPV->Active = false;// Desactivamos el servicio
MDatos->IBDatabase->Open();// Abro la BDD
MDatos->IBDatabase->DefaultTransaction->Active = true;// Activo transaction |
Restauracion:
| Código: |
MDatos->IBDatabase->Close();
MDatos->IBRSTPV->Attach();
MDatos->IBRSTPV->Options << Replace; // Añadimos la opcion de reemplazar archivo de BDD
//MDatos->IBRSTPV->Options << CreateNewDB; // Añadimos la opcion de crear nuevo archivo de BDD
//Para poner el nombre de las rutas,los usuarios y las claves
MDatos->IBRSTPV->DatabaseName->Add("D:\Curso\TPV-Virtual\Datos\TPV.GDB"); // nombre de la base
MDatos->IBRSTPV->BackupFile->Add("D:\Curso\TPV-Virtual\Datos\TPV.BDD"); // archivo backup
MDatos->IBRSTPV->Params->Add("user_name=SYSDBA");
MDatos->IBRSTPV->Params->Add("password=masterkey");
MDatos->IBRSTPV->Active = true; // Activamos el servicio
MDatos->IBRSTPV->ServiceStart(); // Iniciamos la restauracion
ShowMessage("Restauracion realizad con exito");
MDatos->IBRSTPV->Active = false;// Desactivamos el servicio
MDatos->IBRSTPV->Options >> Replace; // Quitamos la opcion de reemplazar archivo de BDD
//MDatos->IBRSTPV->Options >> CreateNewDB; // Quitamos la opcion de crear nuevo archivo de BDD
MDatos->IBDatabase->Open();// Activo la BDD
MDatos->IBDatabase->DefaultTransaction->Active = true;// Activo transaction |
|
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
