Thema: Delphi Sicherung mit Myqsldump

Einzelnen Beitrag anzeigen

sebastian_buege

Registriert seit: 5. Mär 2007
58 Beiträge
 
Delphi 6 Personal
 
#13

Re: Sicherung mit Myqsldump

  Alt 6. Mär 2007, 13:11
Okay aber nun stellt sich das geleiche problem mit der rücksicherung das cmd startet es geht auch alles aber die ausgabe erfolgt auf dem bildschirm und nicht in einer datei

Delphi-Quellcode:
var
   cmd:String;
   shell: array [Byte] of Char;
   size: Dword;
begin
     OpenDialog1.Filter:='Sicherungsdatei|*.sql';
     if OpenDialog1.Execute then
     begin
          GetEnvironmentVariable('COMSPEC',shell,size);
          cmd := '/c ..\Mysql\mysqldump.exe --databases pze -u root -p < ' +OpenDialog1.Files.GetText;
          ShellExecute(0, 'open', shell, PAnsiChar(cmd), '', SW_SHOW);
          ShowMessage('Sicherung angelegt');
     end;
Vielen Dank
  Mit Zitat antworten Zitat