备份与数据恢复的存储过程

这种方式感觉实现起来也不错，我是使用这种方式来完成数据库备份还原的功能的。 
需要指出下面这些存储过程是在网上搜索到的。谢谢代码的提供者。在此转载 

利用T-SQL语句,实现数据库的备份与还原的功能 

体现了SQL Server中的四个知识点： 

1． 获取SQL Server服务器上的默认目录 

2． 备份SQL语句的使用 

3． 恢复SQL语句的使用，同时考虑了强制恢复时关闭其他用户进程的处理 

4． 作业创建SQL语句的使用 



/*1.--得到数据库的文件目录 

@dbname 指定要取得目录的数据库名 
如果指定的数据不存在,返回安装SQL时设置的默认数据目录 
如果指定NULL,则返回默认的SQL备份目录名 
*/ 

/*--调用示例 
select 数据库文件目录=dbo.f_getdbpath('tempdb') 
,[默认SQL SERVER数据目录]=dbo.f_getdbpath('') 
,[默认SQL SERVER备份目录]=dbo.f_getdbpath(null) 
--*/ 
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[f_getdbpath]') and xtype in (N'FN', N'IF', N'TF')) 
drop function [dbo].[f_getdbpath] 
GO 

create function f_getdbpath(@dbname sysname) 
returns nvarchar(260) 
as 
begin 
declare @re nvarchar(260) 
if @dbname is null or db_id(@dbname) is null 
select @re=rtrim(reverse(filename)) from master..sysdatabases where name='master' 
else 
select @re=rtrim(reverse(filename)) from master..sysdatabases where name=@dbname 

if @dbname is null 
set @re=reverse(substring(@re,charindex('\',@re)+5,260))+'BACKUP' 
else 
set @re=reverse(substring(@re,charindex('\',@re),260)) 
return(@re) 
end 
go 


/*2.--备份数据库 

*/ 

/*--调用示例 

--备份当前数据库 
exec p_backupdb @bkpath='c:\',@bkfname='db_\DATE\_db.bak' 

--差异备份当前数据库 
exec p_backupdb @bkpath='c:\',@bkfname='db_\DATE\_df.bak',@bktype='DF' 

--备份当前数据库日志 
exec p_backupdb @bkpath='c:\',@bkfname='db_\DATE\_log.bak',@bktype='LOG' 

--*/ 

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_backupdb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) 
drop procedure [dbo].[p_backupdb] 
GO 

create proc p_backupdb 
@dbname sysname='', --要备份的数据库名称,不指定则备份当前数据库 
@bkpath nvarchar(260)='', --备份文件的存放目录,不指定则使用SQL默认的备份目录 
@bkfname nvarchar(260)='', --备份文件名,文件名中可以用\DBNAME\代表数据库名,\DATE\代表日期,\TIME\代表时间 
@bktype nvarchar(10)='DB', --备份类型:'DB'备份数据库,'DF' 差异备份,'LOG' 日志备份 
@appendfile bit=1 --追加/覆盖备份文件 
as 
declare @sql varchar(8000) 
if isnull(@dbname,'')='' set @dbname=db_name() 
if isnull(@bkpath,'')='' set @bkpath=dbo.f_getdbpath(null) 
if isnull(@bkfname,'')='' set @bkfname='\DBNAME\_\DATE\_\TIME\.BAK' 
set @bkfname=replace(replace(replace(@bkfname,'\DBNAME\',@dbname) 
,'\DATE\',convert(varchar,getdate(),112)) 
,'\TIME\',replace(convert(varchar,getdate(),108),':','')) 
set @sql='backup '+case @bktype when 'LOG' then 'log ' else 'database ' end +@dbname 
+' to disk='''+@bkpath+@bkfname 
+''' with '+case @bktype when 'DF' then 'DIFFERENTIAL,' else '' end 
+case @appendfile when 1 then 'NOINIT' else 'INIT' end 
print @sql 
exec(@sql) 
go 



/*3.--恢复数据库 

*/ 

/*--调用示例 
--完整恢复数据库 
exec p_RestoreDb @bkfile='c:\db_20031015_db.bak',@dbname='db' 

--差异备份恢复 
exec p_RestoreDb @bkfile='c:\db_20031015_db.bak',@dbname='db',@retype='DBNOR' 
exec p_backupdb @bkfile='c:\db_20031015_df.bak',@dbname='db',@retype='DF' 

--日志备份恢复 
exec p_RestoreDb @bkfile='c:\db_20031015_db.bak',@dbname='db',@retype='DBNOR' 
exec p_backupdb @bkfile='c:\db_20031015_log.bak',@dbname='db',@retype='LOG' 

--*/ 

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_RestoreDb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) 
drop procedure [dbo].[p_RestoreDb] 
GO 

create proc p_RestoreDb 
@bkfile nvarchar(1000), --定义要恢复的备份文件名 
@dbname sysname='', --定义恢复后的数据库名,默认为备份的文件名 
@dbpath nvarchar(260)='', --恢复后的数据库存放目录,不指定则为SQL的默认数据目录 
@retype nvarchar(10)='DB', --恢复类型:'DB'完事恢复数据库,'DBNOR' 为差异恢复,日志恢复进行完整恢复,'DF' 差异备份的恢复,'LOG' 日志恢复 
@filenumber int=1, --恢复的文件号 
@overexist bit=1, --是否覆盖已经存在的数据库,仅@retype为 
@killuser bit=1 --是否关闭用户使用进程,仅@overexist=1时有效 
as 
declare @sql varchar(8000) 

--得到恢复后的数据库名 
if isnull(@dbname,'')='' 
select @sql=reverse(@bkfile) 
,@sql=case when charindex('.',@sql)=0 then @sql 
else substring(@sql,charindex('.',@sql)+1,1000) end 
,@sql=case when charindex('\',@sql)=0 then @sql 
else left(@sql,charindex('\',@sql)-1) end 
,@dbname=reverse(@sql) 

--得到恢复后的数据库存放目录 
if isnull(@dbpath,'')='' set @dbpath=dbo.f_getdbpath('') 

--生成数据库恢复语句 
set @sql='restore '+case @retype when 'LOG' then 'log ' else 'database ' end+@dbname 
+' from disk='''+@bkfile+'''' 
+' with file='+cast(@filenumber as varchar) 
+case when @overexist=1 and @retype in('DB','DBNOR') then ',replace' else '' end 
+case @retype when 'DBNOR' then ',NORECOVERY' else ',RECOVERY' end 
print @sql 
--添加移动逻辑文件的处理 
if @retype='DB' or @retype='DBNOR' 
begin 
--从备份文件中获取逻辑文件名 
declare @lfn nvarchar(128),@tp char(1),@i int 

--创建临时表,保存获取的信息 
create table #tb(ln nvarchar(128),pn nvarchar(260),tp char(1),fgn nvarchar(128),sz numeric(20,0),Msz numeric(20,0)) 
--从备份文件中获取信息 
insert into #tb exec('restore filelistonly from disk='''+@bkfile+'''') 
declare #f cursor for select ln,tp from #tb 
open #f 
fetch next from #f into @lfn,@tp 
set @i=0 
while @@fetch_status=0 
begin 
select @sql=@sql+',move '''+@lfn+''' to '''+@dbpath+@dbname+cast(@i as varchar) 
+case @tp when 'D' then '.mdf''' else '.ldf''' end 
,@i=@i+1 
fetch next from #f into @lfn,@tp 
end 
close #f 
deallocate #f 
end 

--关闭用户进程处理 
if @overexist=1 and @killuser=1 
begin 
declare @spid varchar(20) 
declare #spid cursor for 
select spid=cast(spid as varchar(20)) from master..sysprocesses where dbid=db_id(@dbname) 
open #spid 
fetch next from #spid into @spid 
while @@fetch_status=0 
begin 
exec('kill '+@spid) 
fetch next from #spid into @spid 
end 
close #spid 
deallocate #spid 
end 

--恢复数据库 
exec(@sql) 

go 

/*4.--创建作业 

*/ 

/*--调用示例 

--每月执行的作业 
exec p_createjob @jobname='mm',@sql='select * from syscolumns',@freqtype='month' 

--每周执行的作业 
exec p_createjob @jobname='ww',@sql='select * from syscolumns',@freqtype='week' 

--每日执行的作业 
exec p_createjob @jobname='a',@sql='select * from syscolumns' 

--每日执行的作业,每天隔4小时重复的作业 
exec p_createjob @jobname='b',@sql='select * from syscolumns',@fsinterval=4 

--*/ 
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_createjob]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) 
drop procedure [dbo].[p_createjob] 
GO 

create proc p_createjob 
@jobname varchar(100), --作业名称 
@sql varchar(8000), --要执行的命令 
@dbname sysname='', --默认为当前的数据库名 
@freqtype varchar(6)='day', --时间周期,month 月,week 周,day 日 
@fsinterval int=1, --相对于每日的重复次数 
@time int=170000 --开始执行时间,对于重复执行的作业,将从0点到23:59分 
as 
if isnull(@dbname,'')='' set @dbname=db_name() 

--创建作业 
exec msdb..sp_add_job @job_name=@jobname 

--创建作业步骤 
exec msdb..sp_add_jobstep @job_name=@jobname, 
@step_name = '数据处理', 
@subsystem = 'TSQL', 
@database_name=@dbname, 
@command = @sql, 
@retry_attempts = 5, --重试次数 
@retry_interval = 5 --重试间隔 

--创建调度 
declare @ftype int,@fstype int,@ffactor int 
select @ftype=case @freqtype when 'day' then 4 
when 'week' then 8 
when 'month' then 16 end 
,@fstype=case @fsinterval when 1 then 0 else 8 end 
if @fsinterval<>1 set @time=0 
set @ffactor=case @freqtype when 'day' then 0 else 1 end 

EXEC msdb..sp_add_jobschedule @job_name=@jobname, 
@name = '时间安排', 
@freq_type=@ftype , --每天,8 每周,16 每月 
@freq_interval=1, --重复执行次数 
@freq_subday_type=@fstype, --是否重复执行 
@freq_subday_interval=@fsinterval, --重复周期 
@freq_recurrence_factor=@ffactor, 
@active_start_time=@time --下午17:00:00分执行 

go 

/*--应用案例--备份方案: 
完整备份（每个星期天一次）+差异备份（每天备份一次）+日志备份（每2小时备份一次） 

调用上面的存储过程来实现 
--*/ 

declare @sql varchar(8000) 
--完整备份（每个星期天一次） 
set @sql='exec p_backupdb @dbname=''要备份的数据库名''' 
exec p_createjob @jobname='每周备份',@sql,@freqtype='week' 

--差异备份（每天备份一次） 
set @sql='exec p_backupdb @dbname=''要备份的数据库名'',@bktype='DF'' 
exec p_createjob @jobname='每天差异备份',@sql,@freqtype='day' 

--日志备份（每2小时备份一次） 
set @sql='exec p_backupdb @dbname=''要备份的数据库名'',@bktype='LOG'' 
exec p_createjob @jobname='每2小时日志备份',@sql,@freqtype='day',@fsinterval=2 

/*--应用案例2 

生产数据核心库：PRODUCE 

备份方案如下： 
1.设置三个作业,分别对PRODUCE库进行每日备份,每周备份,每月备份 
2.新建三个新库,分别命名为:每日备份,每周备份,每月备份 
3.建立三个作业，分别把三个备份库还原到以上的三个新库。 

目的:当用户在produce库中有任何的数据丢失时,均可以从上面的三个备份库中导入相应的TABLE数据。 
--*/ 

declare @sql varchar(8000) 

--1.建立每月备份和生成月备份数据库的作业,每月每1天下午16:40分进行: 
set @sql=' 
declare @path nvarchar(260),@fname nvarchar(100) 
set @fname=''PRODUCE_''+convert(varchar(10),getdate(),112)+''_m.bak'' 
set @path=dbo.f_getdbpath(null)+@fname 

--备份 
exec p_backupdb @dbname=''PRODUCE'',@bkfname=@fname 

--根据备份生成每月新库 
exec p_RestoreDb @bkfile=@path,@dbname=''PRODUCE_月'' 

--为周数据库恢复准备基础数据库 
exec p_RestoreDb @bkfile=@path,@dbname=''PRODUCE_周'',@retype=''DBNOR'' 

--为日数据库恢复准备基础数据库 
exec p_RestoreDb @bkfile=@path,@dbname=''PRODUCE_日'',@retype=''DBNOR'' 
' 
exec p_createjob @jobname='每月备份',@sql,@freqtype='month',@time=164000 

--2.建立每周差异备份和生成周备份数据库的作业,每周日下午17:00分进行: 
set @sql=' 
declare @path nvarchar(260),@fname nvarchar(100) 
set @fname=''PRODUCE_''+convert(varchar(10),getdate(),112)+''_w.bak'' 
set @path=dbo.f_getdbpath(null)+@fname 

--差异备份 
exec p_backupdb @dbname=''PRODUCE'',@bkfname=@fname,@bktype=''DF'' 

--差异恢复周数据库 
exec p_backupdb @bkfile=@path,@dbname=''PRODUCE_周'',@retype=''DF'' 
' 
exec p_createjob @jobname='每周差异备份',@sql,@freqtype='week',@time=170000 

--3.建立每日日志备份和生成日备份数据库的作业,每周日下午17:15分进行: 
set @sql=' 
declare @path nvarchar(260),@fname nvarchar(100) 
set @fname=''PRODUCE_''+convert(varchar(10),getdate(),112)+''_l.bak'' 
set @path=dbo.f_getdbpath(null)+@fname 

--日志备份 
exec p_backupdb @dbname=''PRODUCE'',@bkfname=@fname,@bktype=''LOG'' 

--日志恢复日数据库 
exec p_backupdb @bkfile=@path,@dbname=''PRODUCE_日'',@retype=''LOG'' 
' 
exec p_createjob @jobname='每周差异备份',@sql,@freqtype='day',@time=171500

刚好学校作业需要，留下了，原文地址 http://jiake.iteye.com/blog/234310