SQL Server 2012 数据库备份

--以下是完整数据库备份

USE [AdventureWorks2012]
GO
/****** Object:  StoredProcedure [dbo].[pr_BatchBackUPDatabase]    Script Date: 2015/12/29 15:26:27 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO


----------执行此脚本需要先执行表值函数---------
--use [AdventureWorks2012]
--go
---- ============================================= 
---- 调用：SELECT Id FROM [Fn_StringSplitToTable](‘1,12,36,65,58,56,DF‘,‘,‘) 
---- Create date: <Create Date,,> 
---- Description:    把用逗号分隔的字符串转换成表格数据 
---- ============================================= 
--CREATE FUNCTION [dbo].[Fn_StringSplitToTable] 
--( 
--    @StringX varchar(MAX), 
--    @Split nvarchar(10) 
--) 
--RETURNS 
--@IdsTable TABLE 
--( 
--    [Id] nvarchar(200) 
--) 
--AS 
--BEGIN 
--    DECLARE @Index int 
--    DECLARE @LenIndex int 
--    SET @LenIndex=LEN(@Split) 
--    SET @Index=CHARINDEX(@Split,@StringX,1) 
--    WHILE (@Index>=1) 
--    BEGIN 
--        IF(LEFT(@StringX,@Index-1) <> ‘‘) 
--            INSERT INTO @IdsTable SELECT LTRIM(RTRIM(LEFT(@StringX,@Index-1))) 
--        SET @StringX=RIGHT(@StringX,LEN(@StringX)-@Index-@LenIndex+1) 
--        SET @Index=CHARINDEX(@Split,@StringX,1) 
--    END 
--    IF(@StringX<>‘‘) INSERT INTO @IdsTable SELECT LTRIM(RTRIM(@StringX)) 
    
--    RETURN 
--END

----------执行此脚本需要开启xp_cmdshell---------
--USE Master
--GO
--EXEC sp_configure ‘show advanced options‘, 1;
--GO
--RECONFIGURE WITH OVERRIDE;
--GO
--EXEC sp_configure ‘xp_cmdshell‘,1;
--GO
--RECONFIGURE WITH OVERRIDE;
--GO
ALTER PROCEDURE [dbo].[pr_BatchBackUPDatabase]
@BackupDirectoryPath  NVARCHAR(50)=‘C:\‘,
@DataBase TINYINT = 1,--1 所有数据库，2 系统数据库，3 所有用户数据库，4 指定数据库
@SelectedDataBase NVARCHAR(1000)=‘‘, --指定的数据库
@SubDirectoryMode BIT = 1,--是否为每个数据库创建子目录
@ExtenName NVARCHAR(50)=‘.bak‘,--备份文件扩展名
--@CheckDB bit = 0, --验证备份完整性
@IsCompress  BIT = 0 --是否备份压缩
AS
BEGIN

--要备份的数据列表
DECLARE @dbname TABLE(
                DbName VARCHAR(100) ) 
--已经存在的数据库目录
DECLARE @DirExistName TABLE(
                DbName VARCHAR(100) ) 
declare @SQL nvarchar(500)
declare @ErrorInfo nvarchar(1000) 

--数据库的值是否合理
if(@DataBase not in(1,2,3,4))
begin
        SET @ErrorInfo = N‘1 所有数据库，2 系统数据库，3 所有用户数据库，4 指定数据库 ，请选择要备份的数据库！‘
        RAISERROR(@ErrorInfo,16,1)        
        RETURN;
end

--是否指定了数据库
if @DataBase=4 and isnull(@SelectedDataBase,‘‘)=‘‘
begin
        SET @ErrorInfo = N‘要备份的数据库为指定数据库时，请输入数据库，多个数据库中间用[,]隔开！‘
        RAISERROR(@ErrorInfo,16,2)        
        RETURN;
end

--把要备份的数据库，放到一个表里
--1 所有数据库
if @DataBase=1
begin
        insert into @dbname
        select name from master..sysdatabases where name <>‘tempdb‘
end
--2 系统数据库
if @DataBase=2
begin
        insert into @dbname
        select name from master..sysdatabases where  sid = 0x01 and name <>‘tempdb‘
end
--3 所有用户数据库
if @DataBase=3
begin
        insert into @dbname
        select name from master..sysdatabases where  sid <> 0x01 and name <>‘tempdb‘
end
--4 指定数据库
if @DataBase=4
begin
        insert into @dbname
        SELECT Id FROM [Fn_StringSplitToTable](@SelectedDataBase,‘,‘) 
end



--循环表,创建子目录
declare @name nvarchar(100)
declare cur   cursor for
        select DbName from @dbname
open cur
fetch next from cur into @name
while(@@fetch_status=0)
begin
        --完备
        declare @strDate varchar(30),@backupFile varchar(200),@currentDate datetime,@backName nvarchar(100)--@Day varchar(20),
        set @currentDate=getdate()
        set @strDate=format(getdate(),‘yyyyMMdd_HHmmss‘)
        set @backName=@name+N‘-完整 数据库 备份‘

        set @backupFile = @BackupDirectoryPath+‘\‘+@name +‘_‘+@strDate+‘.bak‘
 
        --是否为每个数据库创建子目录
        if @SubDirectoryMode =1
        begin
                 
                set @SQL = ‘xp_cmdshell ‘‘dir ‘+@BackupDirectoryPath+‘ /b  /a:d‘‘‘
                insert into @DirExistName
                exec (@SQL)
                ----调试用-------------------------------------------------------------------------------------------------------------------
                --RAISERROR(@SQL,16,2)    ;RETURN;-----------------------------------------------------------------------------------
                if not exists(select 1 from @DirExistName where DBName=@name)
                begin
                        set @SQL=‘xp_cmdshell ‘‘mkdir ‘+@BackupDirectoryPath +‘\‘+@name+‘‘‘‘        
                        exec ( @SQL    )
                end

                set @backupFile = @BackupDirectoryPath+‘\‘+@name+‘\‘+@name +‘_‘+@strDate+‘.bak‘
        end

        --开始备份
        if @IsCompress=1
        begin
                backup database @name to disk=@backupFile WITH  NOINIT,  NAME = @backName, COMPRESSION
        end
        else
        begin
                backup database @name to disk=@backupFile WITH  NOINIT,  NAME = @backName,NO_COMPRESSION
        end

        fetch next from cur into @name
end
close cur
deallocate cur

print ‘备份完成。‘;
return;

END