备份的代码如下:
//开始备份
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;
运行,还原成功!!但是數據庫會變爲脫機狀態，導致其他用戶不能連接。解決的辦法有两种：
一：用存储过程：
在master数据库中加入下面的存储过程
if exists(select name from sysobjects where name='usp_restoredb')
drop proc usp_restoredb
go
/*
exec usp_restoredb "library","D:\dbbak.bak"
*/
create proc usp_restoredb
(
@dbname varchar(255), --数据库名字
@filepath varchar(255) --文件路径
)
as
set nocount on
--exec ('use master go')
exec ('alter database '+@dbname+' set offline WITH ROLLBACK IMMEDIATE')
exec ('restore database '+@dbname+' from disk="'+@filepath+'" with REPLACE')
exec ('alter database '+@dbname+' set online with rollback IMMEDIATE')
if @@error<>0
begin
select 'F','数据库恢复失败'
return
end
else
begin
select 'T','数据库恢复成功'
return
end
运行．
然后在Delphi的调用这一存储过程，调用过程如下：
//注意：这时的ADOQuery1要连到master数据库，不能连到library数据库！！
with ADOQuery1 do
Begin
Close;
SQL.Clear;
// filename是你备份文件的路径加文件名
SQL.Add('exec usp_restoredb "Library","'+ filename+'"');
Open;
if ADOQuery1.Fields[0].AsString='F' then
ShowMessage('还原失败!!')
else
ShowMessage('还原成功!!');
end;
运行成功！且library数据库不会变为脱机！
第二种方法：
也是运行ADOQuery1来实现，不用存储过程，ADOQuery1一定要连到master数据库，否则就会让library脱机！，代码如下：
begin
DataModule17.ADOConnection1.Close;//这个是连到library数据库的，所以要先断开
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;
end; //End Of 还原数据库
运行成功！library数据库被还原
PS: sql server 还原数据库时提示数据库正在使用，无法进行操作的解决方法
sql server 还原数据库时提示：数据库正在使用，无法进行操作的解决方法
这个问题的原因在于有用户连接了当前要做还原的数据库，这里的用户甚至包括当前要做还原的用户。解决办法就是关闭与要还原数据库的所有连接。
脚本之家小编推荐的一个方法：到服务里面重启下sqlserver服务即可。
问题一描述：SQL Server数据库备份还原后，在数据库名称后会出现“受限制访问”字样
问题二描述：在对SQL Server数据库进行还原时，提示：System.Data.SqlClient.SqlError:因为数据库正在使用，所以无法获得对数据库的独占访问权。(Microsoft.SqlServer.Smo)。出现此问题的原因是在还原数据库时，有其他用户正在使用数据库。还原数据库要求数据库工作在单用户模式。通常就是DBA在操作时，不允许其他用户连接数据库。问题一解决办法：右键点击数据库 -> 属性 -> 选项 -> 状态 -> 限制访问 -> 选择Multiple -> 确定。问题二解决办法：方法一（最方便）：右键点击数据库 -> 属性 -> 选项 -> 状态 -> 限制访问 -> 选择Single-> 确定。然后还原。
方法二（最直接）：断开数据库连接
方法三（最暴力）：注销/重启数据库服务器
方法四（最麻烦）：写代码修改数据库相关属性，虽然麻烦，有的时候还是要用到，那就用到的时候再研究。①先切换数据库到master数据库。执行语句
select * from master..sysprocesses where dbid=db_id( '数据库名称')
②然后逐步运行语句 exec kill spid(上一步结果集中的数据),问题就解决了。哈哈今天在还原数据库的时候，提示"因为数据库正在使用，所以无法获得对数据库的独占访问权"，无论我是重启数据库，还是重启计算机，都不能解决问题，多番尝试后，终于解决了该问题。现将引发该问题的原因与解决方案写出来，有不对的地方欢迎大家提出来。引发原因：是因为我在还原数据库的时候，还有其他的用户正在使用数据库，所以就会出现以上提示。解决方法：1,设置数据库在单用户模式下工作。
设置方法：在需要还原的数据库上右击，在右键菜单命令上选择"属性"- >"选项"- >"状态"- >"限制访问"- >"Single"。这是SQLSERVER2005的菜单命令，其它版本请自己查找。
2,利用SQL语句，杀死正在使用该数据库的所有进程，自己以前在做一个SQL SERVER操作小工具的时候有写过该功能的SQL，贴出来供大家参考：
declare @dbname varchar(50)
set @dbname='数据库名称'
declare @sql varchar(50)
declare cs_result cursor local for select 'kill '+cast(spid as varchar(50)) from sys.sysprocesses where db_name(dbid)=@dbname
open cs_result
fetch next from cs_result into @sql
while @@fetch_status=0
begin
execute(@sql)
fetch next from cs_result into @sql
end
close cs_result
deallocate cs_result
该SQL语句利用游标循环所有正在使用该数据库的进程，并通过kill命令杀死进程。
3,利用SQL语句,断开所有用户链接，并回滚所有事务，具体SQL语句如下：
ALTER DATABASE [数据库名称]
SET OFFLINE WITH ROLLBACK IMMEDIATE
注意:在使用方法2与3时，不要在需要的还原的数据库下执行，建议在master数据库下面执行。
本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
