请教mysql的数据备份怎么做!用程序作语句怎么写,我写的SQL语句怎么不对,请大家帮我看看,谢谢了!!!
我的SQL语句是这样写的:
Q1.SQL.add('Backup database lzcustoms to disk='+''''+'..\data\'+ datetimetostr(now)+'''');
可是不对!应该怎么做啊!谢谢了!!!

解决方案 »

  1.   

    delphi中mysql的数据备份语句怎么写啊!!!或者要自动实现其功能应该怎么解决???
      

  2.   

    adoquery1.add('backup database 数据库名 to disk='+quotedstr('路径/备份文件名.bak'));
    例如:adoquery1.add('backup database lzcustoms to disk='+quotedstr('c:/program files/zcustoms.bak'));
      

  3.   

    楼上写的是SQLServer数据库的备份,我要得是mysql数据库的备份方法?
    在delphi中用语句怎么写啊!求各为帮帮忙了!!!
      

  4.   

    我给你一个例子:
    c:\mysql\bin\mysqldump.exe --user=root --password=root --where="date1>='2006-04-01' and date1<='2006-04-30'" cashpark account> account.txt
      

  5.   

    mysqldump -uuser -ppassword w"date1>='2006-04-01' and date1<='2006-04-30'>youname.sql
      

  6.   


    备份:
    procedure TBackupFrm.BitBtn2Click(Sender: TObject);
    begin
      if Edit1.Text= '' then
        begin
          Showmessage('无选择要保存的文件名');
          exit;
        end;
      try
        try
          dmData.adoQryTmp.Active:= false;
          dmData.adoQryTmp.SQL.Clear;
          dmData.adoQryTmp.SQL.Add('BACKUP DATABASE [dzyl] TO DISK = '''+edit1.text+''' WITH INIT');
          dmData.adoQryTmp.ExecSQL;
        finally
          begin
            dmData.adoQryTmp.Active:= false;
            Showmessage('数据库备份成功!');
          end;
        end;
      except
      on e:exception do
        begin
          ShowMessage('数据库备份失败!');
        end;
      end;
    end;
    ---------------
    恢复
    procedure TBackupFrm.BitBtn4Click(Sender: TObject);
    begin
      if Edit2.Text = '' then
        begin
          showmessage('未选择要恢复的数据库文件!');
          exit;
        end;
      with dmData do
      begin
        try
          adocmmd.CommandText:='use master';
          adocmmd.Execute;
          adocmmd.CommandText:=' alter database dzyl set offline with rollback immediate';
          adocmmd.Execute;
          adocmmd.CommandText:='restore database dzyl from disk= '''+edit2.Text+''' with recovery ';
          adocmmd.Execute;
          adocmmd.CommandText:=' alter database dzyl set online with rollback immediate';
          adocmmd.Execute;
          showmessage('数据库恢复成功!');
          application.Terminate;
        except
        on e:exception do
          begin
            showmessage('数据库恢复失败!'+e.Message);
          end;    end;
      end;
      end;