请教mysql的数据备份怎么做!用程序作语句怎么写,我写的SQL语句怎么不对,请大家帮我看看,谢谢了!!!
我的SQL语句是这样写的:
Q1.SQL.add('Backup database lzcustoms to disk='+''''+'..\data\'+ datetimetostr(now)+'''');
可是不对!应该怎么做啊!谢谢了!!!
我的SQL语句是这样写的:
Q1.SQL.add('Backup database lzcustoms to disk='+''''+'..\data\'+ datetimetostr(now)+'''');
可是不对!应该怎么做啊!谢谢了!!!
解决方案 »
- 高手帮帮忙,小问题!在线等
- delphi listview控件问题
- 救救我关于版本的问题
- Ladies and gentlemen: 谁用过TMs Async32控件包(串口开发)中的VaTernimal控件啊!帮忙啊!
- 换公司了,收拾心情,重新来过。散分
- RAve 報表detail 區只打印10條記錄
- 我想对DBGRID中的行进行操作,最好是单击其中一行,程序就能知道他的值
- Hint不能消除
- 从一个文本文件中读取字符,如何判断是英文字符,还是中文字符,还是其他字符?
- 如何在不使用数据库的情况下在ExpressQuantumGrid中插入一个节点数据,给50分
- 关于SQL Server2000数据库备份还原问题(在线等!)
- 谁用过SQLDMO备份SQL Server数据库?急!!!
例如:adoquery1.add('backup database lzcustoms to disk='+quotedstr('c:/program files/zcustoms.bak'));
在delphi中用语句怎么写啊!求各为帮帮忙了!!!
c:\mysql\bin\mysqldump.exe --user=root --password=root --where="date1>='2006-04-01' and date1<='2006-04-30'" cashpark account> account.txt
备份:
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;