Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Error al intentar ejecutar IBRestore (https://www.clubdelphi.com/foros/showthread.php?t=56780)

egostar 27-05-2008 16:33:36

Error al intentar ejecutar IBRestore
 
Hola estoy intentando ejecutar respaldos y restauraciones de mi base de datos (Firebird 2.0) y estoy atorado con un problema a la hora de lanzar la restauraración

El mensaje de error es el siguiente:

Cita:

---------------------------
Debugger Exception Notification
---------------------------
Project BackupRestore.exe raised exception class EIBClientError with message 'SPB Constant Unknown'.
---------------------------
Break Continue Help
---------------------------
Este es el código que uso:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  with IBRestoreService1 do begin
     DataBaseName.Clear;
     BackupFile.Clear;
     DataBaseName.Add('D:\Desarrollo\TDelphi\Starw Basico\Base\STARADM.FDB');
     BackupFile.Add('D:\Desarrollo\TDelphi\Starw Basico\Base\backupfile.fbk');
     Active:= True;
     ServiceStart;
     while not eof do
        Memo1.Lines.Add(GetNextLine);
     Label2.Caption:='Restauracion Terminada';
     Active:= False;
  end;
end;

El error es lanzando en esta línea

Código Delphi [-]
     Active:= True;

Pensé que podría ser por falta de firmarme con usuario y contraseña, por lo que puse la propiedad LoginPrompt del IBRestore a True pero me envía este error:

Cita:

---------------------------
Debugger Exception Notification
---------------------------
Project BackupRestore.exe raised exception class EIBClientError with message 'Operation cancelled at user's request'.
---------------------------
Break Continue Help
---------------------------
Que estoy haciendo mal ???

Nota:

El Respaldo se genera sin problemas con este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  IBBackupService1.Active:= True;
  IBBackupService1.ServiceStart;
  while not IBBackupService1.eof do begin
        IBBackupService1.GetNextLine;
  end;
  IBBackupService1.Active:= False;
  Form1.Label1.Caption:='Respaldo Terminado';
end;

Salud OS

jhonny 27-05-2008 20:54:06

Verifica que la propiedad params tenga los siguientes valores, que los nombres de los valores sean, tal y como aparecen a continuación:

user_name=SYSDBA (El respectivo usuario)
password=masterkey (Claro, la respectiva contraseña)

También puedes hacerlo a través del asistente haciendo DobleClick al TIBRestoreService ;).

egostar 27-05-2008 21:12:14

Cita:

Empezado por jhonny (Mensaje 289452)
Verifica que la propiedad params tenga los siguientes valores, que los nombres de los valores sean, tal y como aparecen a continuación:

user_name=SYSDBA (El respectivo usuario)
password=masterkey (Claro, la respectiva contraseña)


A vaya, ya veo el problema

user_name=SYSDBA

yo le asignaba

user name=SYSDBA

Sin el guion bajo

Cita:

Empezado por jhonny (Mensaje 289452)
También puedes hacerlo a través del asistente haciendo DobleClick al TIBRestoreService ;).

Bueno, bueno, no me hagas sentir como que hice una pregunta pendeja :D:D:D

Muchas gracias amigo jhonny

Salud OS

enecumene 28-05-2008 03:29:14

Cita:

Empezado por egostar (Mensaje 289457)
Bueno, bueno, no me hagas sentir como que hice una pregunta pendeja :D:D:D

Sin comentarios...:D:D:D


La franja horaria es GMT +2. Ahora son las 06:03:08.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi