自己的定義的容災方案，可以根據自己的需要自己定義.

1.源資料庫備份資料

說明:
使用方法:exec master.dbo.fullbackup1 's:\backup','suzhou','full'

0.備份型別只能是full、diff或log，資料庫名不能為空

1.通過新建一個歷史表記錄每次備份內容

2.檢查資料庫版本是否為2005以上

3.檢查當前使用者是否有許可權完成備份

4.會自動檢查指定碟符是否存在

5.檢查指定格式是否為s:\

6.如果指定的備份目錄不存在proc將自動新建，根據備份型別為full、diff或log

7.檢查備份資料庫名suzhou是否存在並聯機

8.檢查備份資料庫名suzhou不能是臨時資料庫

9.如果備份型別為差異備份則檢查是否有完全備份存在並且備份的這個檔案存在於指定的目錄下，
如果備份歷史表有記錄但是該備份檔案不存在將終止備份

10.如果備份型別為日誌備份，先檢查資料庫恢復模式是否為完整，否則將停止備份;
將進一步檢查備份歷史表和備份檔案，必須存在完全備份或差異備份,否則終止備份

USE [msdb]
GO
if OBJECT_ID('backuphistory')is not null
drop table backuphistory
go
CREATE TABLE [dbo].[backuphistory](
 [sid] [int] IDENTITY(1,1) NOT NULL primary key,
 [dbname] [sysname] NOT NULL,
 [backtype] [char](2) NOT NULL,
 [lastbackup] [datetime] NOT NULL,
 [backupdesc] [varchar](20) NOT NULL,
 [backupfilename] [nvarchar](max) NULL,
)
GO

use master
go
create PROCEDURE [dbo].[fullbackup1]
(
@backupPath varchar(500),
@dbname sysname,
@backuptype varchar(100)
)
with encryption
as

declare @currentuser sysname
declare @role varchar(30)
select   @currentuser=system_user

DECLARE @Version numeric(18,10)
DECLARE @Error int
declare @Directory nvarchar(100)
DECLARE @CheckDirectory nvarchar(4000)
DECLARE @DirectoryInfo TABLE (FileExists bit,
                                FileIsADirectory bit,
                                ParentDirectoryExists bit)
DECLARE @ErrorMessage nvarchar(max)
DECLARE @backupPath2 nvarchar(500)
DECLARE @DirTree TABLE (subdirectory nvarchar(255), depth INT)
DECLARE @FullPath varchar(1000)
declare @backupPath3 nvarchar(500)
declare @recovery_model_desc varchar(20)
declare @backtype varchar(100)
declare @backupdesc varchar(20)
declare @backupfilename varchar(max)

-----new
DECLARE @tmp TABLE (backupfilename varchar(3000),
                                backuptime datetime)
declare @fullbafile varchar(3000)
declare @result int
declare @log_start int

set nocount on

--檢查使用者許可權
select @role=srvrole from
(
select SrvRole = g.name, MemberName = u.name
  from sys.server_principals u, sys.server_principals g, sys.server_role_members m
 where g.principal_id = m.role_principal_id
   and u.principal_id = m.member_principal_id
   and [email protected]
   ) c
  --order by 1, 2
if @role !='sysadmin' or @role is null or @role=''
begin
  RAISERROR('當前使用者沒有需要的許可權完成備份!',16,1)
  print '你可能是越權操作或其它!'+char(13)+'請聯絡DBA!'
  SET @Error = @@ERROR
  return
end

--檢查伺服器版本
SET @Error = 0
SET @Version = CAST(LEFT(CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(max)),
CHARINDEX('.',CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(max))) - 1) + '.'
+ REPLACE(RIGHT(CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(max)),
LEN(CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(max))) - CHARINDEX('.',
CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(max)))),'.','') AS numeric(18,10))
IF @Version < 9
BEGIN
  RAISERROR('該備份方案僅支援 SQL Server 2005, SQL Server 2008和SQL Server 2008 R2.',16,1)
  SET @Error = @@ERROR
  return
END

set @[email protected]

--判斷路徑格式
  IF NOT (@Directory LIKE '[a-z]:\%' )
  BEGIN
    SET @ErrorMessage = '輸入的目錄'[email protected]+'格式'+ '不支援！.'+' 參考型別如: s:\backup' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
  END

--判斷輸入的資料庫名是否存在

  IF @dbname not in(select name from sys.databases)
  BEGIN
    SET @ErrorMessage = '資料庫名: '[email protected]+' 不存在!.' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
  END

--判斷輸入的碟符是否存在和是否新建目錄
--檢查指定碟符是否存在

SET @CheckDirectory = substring(@Directory,1,3)
INSERT INTO @DirectoryInfo (FileExists, FileIsADirectory, ParentDirectoryExists)
EXECUTE [master].dbo.xp_fileexist @CheckDirectory
IF NOT EXISTS (SELECT * FROM @DirectoryInfo WHERE FileExists = 0 AND FileIsADirectory = 1 AND ParentDirectoryExists = 1)
  BEGIN
    SET @ErrorMessage = '伺服器上不存在指定的碟符:'+upper(substring(@CheckDirectory,1,1)+ CHAR(13) + CHAR(10))
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
 END

--判斷是否輸入備份資料庫名
IF @dbname IS NULL OR @dbname = ''
  BEGIN
    SET @ErrorMessage = '未輸入任何備份資料庫名.' + CHAR(13) + CHAR(10)+'備份程序已終止!'
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
  END

else if (@dbname='tempdb' or @dbname='TEMPDB')
 begin
 SET @ErrorMessage = '臨時資料庫不需要備份.' + CHAR(13) + CHAR(10)+'備份程序已終止!'
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
 end
else if (@dbname  in ( select name from sys.databases where state_desc='OFFLINE' or state_desc='offline'))
 begin
 SET @ErrorMessage = '離線的資料庫'[email protected]+'不需要備份.' + CHAR(13) + CHAR(10)+'備份程序已終止!'
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
    return
 end

--判斷輸入型別
if  @backuptype not in ('full','diff','log')
begin
 print '#########################嚴重警告###############嚴重警告#################################'
 print '不支援型別'[email protected]+'!   只能輸入(full:完全備份; diff:差異備份; log:日誌備份)                        '
 print '有問題請聯絡ocpyang!'
 print '#########################嚴重警告###############嚴重警告###################################'
 return
end

--判斷目錄是否存在
SET @[email protected]+'\'[email protected]
INSERT INTO @DirTree(subdirectory, depth)
EXEC master.sys.xp_dirtree @backupPath
IF NOT EXISTS (SELECT 1 FROM @DirTree WHERE subdirectory = @DBName)
begin
 print '系統將新建目錄：'[email protected]+' ............' 
   EXEC master.dbo.xp_create_subdir @backupPath2
   print '目錄：'[email protected]+'新建成功!'
   print '         '
   delete from  @DirTree
end
else
begin
 print '----------------------------------------------------------------------- '
 print '目錄：'[email protected]+'已經存在！'
 print '                                                                        '+char(13)+'備份執行中$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
 print '----------------------------------------------------------------------- '
 delete from  @DirTree
end

--開始完全備份
if @backuptype='full'
begin
print '.............................................................................'
print '開始完全備份.....請稍等'
print '.............................................................................'
--隱藏檢查目錄
set @[email protected]+'\'+'full'
INSERT INTO @DirTree(subdirectory, depth)
EXEC master.sys.xp_dirtree @backupPath3
IF NOT EXISTS (SELECT 1 FROM @DirTree WHERE subdirectory = @backupPath3)
EXEC master.dbo.xp_create_subdir @backupPath3
delete from @DirTree
set @FullPath = @backuppath3+'\'[email protected]+'_'[email protected]+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.bak'
backup database @dbname to [email protected]
WITH buffercount = 20, maxtransfersize = 2097152 ,
COMPRESSION,RETAINDAYS=15,NOFORMAT,NOINIT,
NAME=N'完整備份',SKIP,NOREWIND,
NOUNLOAD,STATS=10

set @backtype='D'
set @backupdesc='完全備份'
set @[email protected]
insert into msdb.dbo.backuphistory
(dbname,backtype,lastbackup,backupdesc,backupfilename)
values(@dbname, @backtype,GETDATE(), @backupdesc,@backupfilename)
    SET @Error = @@ERROR
    if @Error !=0
    begin
    SET @ErrorMessage = '資料庫'[email protected]+'完全備份未順利完成！: ' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    return
    end
  
print '                                                                    '
print '----------------------------------------------------------------------- '
print @dbname+'完全備份 '[email protected]+' 已經完成!'
print '----------------------------------------------------------------------- '
return
end

--開始差異備份
else if @backuptype='diff'
begin
 print '                                                                             '
 print '.............................................................................'
    print '開始差異備份.....請稍等'
    print '.............................................................................'
    --檢查是否有完全備份並存在
 insert into @tmp                        
 select top 1  a.backupfilename,
 MAX(a.lastbackup)  as backuptime from msdb.dbo.backuphistory a
 where [email protected] and a.backtype='D'
 group by backupfilename
 order by a.backupfilename desc
 if not exists (select top 1 1 from @tmp )
    begin
    SET @ErrorMessage = '資料庫'[email protected]+'沒有完全備份歷史記錄!!' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    return
    end
 else
 begin 
     select @fullbafile=backupfilename from @tmp
     exec xp_fileexist @fullbafile, @result output
  if (@result=0 )
  begin
  SET @ErrorMessage = '資料庫'[email protected]+'完全備份檔案不存在!做差異備份無意義!' + CHAR(13) + CHAR(10)
  RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
  return
  end
     end

    --隱藏檢查目錄
 set @[email protected]+'\'+'diff'
 INSERT INTO @DirTree(subdirectory, depth)
 EXEC master.sys.xp_dirtree @backupPath3
 IF NOT EXISTS (SELECT 1 FROM @DirTree WHERE subdirectory = @backupPath3)
 EXEC master.dbo.xp_create_subdir @backupPath3
 delete from @DirTree
 set @FullPath = @backuppath3+'\'[email protected]+'_'[email protected]+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.diff'
 backup database @dbname to [email protected]
 WITH buffercount = 30, maxtransfersize = 2097152 ,
 COMPRESSION, DIFFERENTIAL,RETAINDAYS=8,NOFORMAT,NOINIT,
 NAME=N'差異備份',SKIP,NOREWIND,
 NOUNLOAD,STATS=10
 
 set @backtype='I'
 set @backupdesc='差異備份'
 set @[email protected]
 insert into msdb.dbo.backuphistory
 (dbname,backtype,lastbackup,backupdesc,backupfilename)
 values(@dbname, @backtype,GETDATE(), @backupdesc,@backupfilename)
    SET @Error = @@ERROR
    if @Error !=0
    begin
    SET @ErrorMessage = '資料庫'[email protected]+'差異備份未順利完成！: ' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    return
    end
 
 
 print '                                                                    '
   print '----------------------------------------------------------------------- '
   print @dbname+'差異備份 '[email protected]+' 已經完成!'
  print '----------------------------------------------------------------------- '
  return
end
 
 
--開始日誌備份
else  if @backuptype='log'
begin
 print '                                                                        '
    print '檢查環境.....請稍等..'
    print '                                                                        '
    --檢查資料庫恢復模式
 select @recovery_model_desc=recovery_model_desc from sys.databases
 where [email protected]
 if @recovery_model_desc not in ('full')
 begin
 print '########錯誤資訊######################################################'
 print '                                                                         '+char(13)+'請檢查資料庫'[email protected]+'的恢復模式!'+char(13)+ '使用命令ALTER DATABASE'[email protected]+' SET RECOVERY FULL WITH NO_WAIT修改!'
 print '                                                                         '
 print '########錯誤資訊######################################################'
 print '                                                                         '+char(13)+'日誌備份已終止!'
 return
 end
    print '.........................................................................'
 print '                                                                         '
    print '開始日誌備份.....請稍等'
    print '                                                                         '
    print '.........................................................................'
   
    --檢查是否有完全備份或差異備份
   -------------------------------------------------------------------------
   
        --檢查是否有完全備份並存在
   

set  @log_start=0  
insert into @tmp                        
select top 1  a.backupfilename,
MAX(a.lastbackup)  as backuptime from msdb.dbo.backuphistory a
where [email protected] and a.backtype='D'
group by backupfilename
order by a.backupfilename desc
if not exists (select top 1 1 from @tmp)
    begin
  set  @log_start=1
    end
else
 begin 
    select @fullbafile=backupfilename from @tmp
    exec xp_fileexist @fullbafile, @result output
  if (@result=0 )
  begin
   set  @log_start=2
  end

  end
 
  --檢查是否有差異備份並存在
insert into @tmp                        
select top 1  a.backupfilename,
MAX(a.lastbackup)  as backuptime from msdb.dbo.backuphistory a
where [email protected] and a.backtype='I'
group by backupfilename
order by a.backupfilename desc
if not exists (select top 1 1 from @tmp)
    begin
 set  @log_start=3
    end
else
 begin 
    select @fullbafile=backupfilename from @tmp
    exec xp_fileexist @fullbafile, @result output
  if (@result=0 )
  begin
   set  @log_start=4
  end
 end

if @log_start !=0
begin
    SET @ErrorMessage = '資料庫'[email protected]+'沒有完全備份或差異備份!: ' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    return
end

   
   
   
   
   
    ------------------------------------------------------------------------------
   
    --隱藏檢查目錄
    set @[email protected]+'\'+'log'
    INSERT INTO @DirTree(subdirectory, depth)
 EXEC master.sys.xp_dirtree @backupPath3
 IF NOT EXISTS (SELECT 1 FROM @DirTree WHERE subdirectory = @backupPath3)
 EXEC master.dbo.xp_create_subdir @backupPath3
 delete from @DirTree
 --開始備份
 set @FullPath = @backuppath3+'\'[email protected]+'_'[email protected]+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.trn'
 backup log @dbname to [email protected] WITH COMPRESSION,RETAINDAYS=3,NOFORMAT,NOINIT,
 NAME=N'日誌備份',SKIP,NOREWIND,
 NOUNLOAD,STATS=10
 
 set @backtype='L'
 set @backupdesc='日誌備份'
 set @[email protected]
 insert into msdb.dbo.backuphistory
 (dbname,backtype,lastbackup,backupdesc,backupfilename)
 values(@dbname, @backtype,GETDATE(), @backupdesc,@backupfilename)
    SET @Error = @@ERROR
    if @Error !=0
    begin
    SET @ErrorMessage = '資料庫'[email protected]+'日誌備份未順利完成！: ' + CHAR(13) + CHAR(10)
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    return
    end
 
 
  print '                                                                    '
   print '-------------------------------------------------------------------------'
   print @dbname+'日誌備份 '[email protected]+' 已經完成!'
  print '---------------------------------------------------------------------------'
  return
end
set nocount off
GO