备份SQL SERVER数据库代码

原创 2006年05月31日 18:15:00

procedure Tfrm_planmana.N20Click(Sender: TObject);
var
  ado:TADOCommand;
  msg:tfrm_hfdb_list;

begin
//操作员没有些权限
if admin_flag='2' then
begin
MessageBox(handle,'您没有权限进行此操作!','提 示',MB_OK);
exit;
end;
// 确实要备份吗?
if(MessageBox(handle,'确实要备份吗?','提 示',mb_IconInformation+mb_YesNo)=mrno) then exit;
//如果没有这个目录将创建此目录
     
      msg := tfrm_hfdb_list.Create(application);
      //msg.SetMessage('正在备份,可能需要几分钟时间。');
        ado := TADOCommand.Create(nil);
        ado.Connection := dm1.ADOConnection1;
        ado.CommandTimeout := 300;
        //deletefile('d:/工作计划管理软件数据备份/plan_mana');//只能删除本机的文件
        msg.Show;
        application.ProcessMessages;
        //ado.CommandText := 'BACKUP DATABASE plan_mana TO DISK = ''' + SaveDialog1.FileName + '''';
        ado.CommandText := 'BACKUP DATABASE plan_mana TO DISK = ''d:/工作计划管理软件数据备份/plan_mana''';
        msg.Close;
        msg.Free;
        try
          ado.Execute;
        except
          MessageBox(handle,'数据库备份失败','      提 示',MB_OK);
          Exit;
        end;
        ado.Free;
        MessageBox(handle,'操作成功,数据库已备份。','      提 示',MB_OK);

end;

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

SQL Server数据库 bcp导出备份文件应用

/** * 授权 */ EXEC sp_configure 'show advanced options',1; go reconfigure; go exec sp_configure 'xp_...

修改SQL Server 2005/2008 用户数据库文件默认路径和默认备份路径

以下仅为参照,如果有多个实例,可能会有些许不同: 本环境是SQL Server 2005 Standard Version 64-bit 和 SQL Server 2008 Standard V...

SQL SERVER数据库备份恢复

  • 2006-02-23 09:05
  • 452KB
  • 下载

Sql Server数据库的备份和恢复措施

最常用的操作,新手们看看…… 一、备份数据库1、打开SQL企业管理器,在控制台根目录中依次点开Microsoft SQL Server2、SQL Server组-->双击打开你的服务器-->双击打开数...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)