Cita:
Empezado por afunez2007
Asumiendo que la ruta origen esta en u Tlabel y el destino esta en un TEdit que puedes rellenar con SaveDialog, el codigo seria el siguiente:
Código Delphi [-]
WinExec(PChar('C:\Program Files\Firebird\Firebird_2_0\bin\gbak.exe -v -t -user SYSDBA -password "masterkey" '+lbl3.Caption+' '+edtruta.Text),SW_NORMAL);
Adjunto te envio el proyecto completo para que veas todos los pormenores, solo lo abres con delphi 7 y lo ejecutas de nuevo, porque he removido el exe ya compilado por temas de espacio
Saludos |
Amigo Afunez2007
Gracias por tu aporte, aunque estoy utilizando los componentes de IB que trae el D2009 para hacer el respaldo (TIBackupService)
Trate de Baja tu archivo adjunto pero me dice que el archivo esta dañado.
Cita:
Empezado por roman
Componentes como el SaveDialog están hechos para seleccionar archivos, no carpetas. Para esto último puedes usar la función SelectDirectory de la unidad FileCtrl. Busca en la ayuda acerca de esta función, porque tiene dos versiones. Una que te muestra el cuadro de diálogo estándar de Windows, y otra que te muestra uno más bien feo de antiguas versiones de Windows.
// Saludos
|
Amigo Roman
Hare la Prueba con la Funcion que me mencionas .
Los mantendre al Tanto