网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > DELPHI > 正文
Delphi sql server数据库的备份和还原
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12
下载{$ArticleTitle}原创论文样式
备份的代码如下:

     //开始备份

      with adoquery1 do
        begin
             close;
             sql.Clear;
             sql.Add(''Backup database library to disk=:p1 with init'');
             parameters.ParamByName(''p1'').Value:=self.SaveDialog1.FileName;
            try
                Execsql;
               ShowMessage(''备份成功!!'');
            except
                ShowMessage(''备份失败!!'');
                exit;
            end;
       end; //End of 备份

  下面来说一下还原,还原与备份不一样,备份不需要关闭数据库,但还原就要先关闭数据库才行.第一次写的代码如下:

       with ADOQuery1 do
         begin
            Close;
            SQL.Clear;

            SQL.Add(''use master alter database library set offline WITH ROLLBACK IMMEDIATE '');
            SQL.Add(''restore database library from disk=:p1 with REPLACE'');
            SQL.Add(''alter database library set online with rollback immediate'');
            parameters.ParamByName(''p1'').Value := self.Edit1.Text;
            try
              ExecSQL;
              ShowMessage(''还原成功!!'');
            except
              Showmessage(''还原失败!!'');
              exit;
            end;
         end;
   运行,还原成功!!但是數據庫會變爲脫機狀態,導致其他用戶不能連接。解決的辦法有两种:

 一:用存储过程

  • 上一篇资讯: Delphi和Excel的亲密接触
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号