实战:sqlserver 2008 R2容灾方案:另一种思路-1
来源：互联网 发布：网络系统集成技术 编辑：程序博客网 时间：2024/06/05 09:48
自己的定义的容灾方案，可以根据自己的需要自己定义.
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 u.name=@currentuser
) 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 @Directory=@backupPath
--判断路径格式
IF NOT (@Directory LIKE '[a-z]:\%' )
BEGIN
SET @ErrorMessage = '输入的目录'+@Directory+'格式'+ '不支持！.'+' 参考类型如: 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 = '数据库名: '+@dbname+' 不存在!.' + 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 = '脱机的数据库'+@dbname+'不需要备份.' + 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 '不支持类型'+@backuptype+'! 只能输入(full:完全备份; diff:差异备份; log:日志备份) '
print '有问题请联系ocpyang!'
print '#########################严重警告###############严重警告###################################'
return
end
--判断目录是否存在
SET @backupPath2=@backupPath+'\'+@dbname
INSERT INTO @DirTree(subdirectory, depth)
EXEC master.sys.xp_dirtree @backupPath
IF NOT EXISTS (SELECT 1 FROM @DirTree WHERE subdirectory = @DBName)
begin
print '系统将新建目录：'+@backupPath2+' ............'
EXEC master.dbo.xp_create_subdir @backupPath2
print '目录：'+@backupPath2+'新建成功!'
print ' '
delete from @DirTree
end
else
begin
print '----------------------------------------------------------------------- '
print '目录：'+@backupPath2+'已经存在！'
print ' '+char(13)+'备份运行中$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
print '----------------------------------------------------------------------- '
delete from @DirTree
end
--开始完全备份
if @backuptype='full'
begin
print '.............................................................................'
print '开始完全备份.....请稍等'
print '.............................................................................'
--隐藏检查目录
set @backupPath3=@backupPath2+'\'+'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+'\'+@dbname+'_'+@backuptype+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.bak'
backup database @dbname to disk=@FullPath
WITH buffercount = 20, maxtransfersize = 2097152 ,
COMPRESSION,RETAINDAYS=15,NOFORMAT,NOINIT,
NAME=N'完整备份',SKIP,NOREWIND,
NOUNLOAD,STATS=10
set @backtype='D'
set @backupdesc='完全备份'
set @backupfilename=@FullPath
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 = '数据库'+@dbname+'完全备份未顺利完成！: ' + CHAR(13) + CHAR(10)
RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
return
end
print ' '
print '----------------------------------------------------------------------- '
print @dbname+'完全备份 '+@FullPath+' 已经完成!'
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 a.dbname=@dbname and a.backtype='D'
group by backupfilename
order by a.backupfilename desc
if not exists (select top 1 1 from @tmp )
begin
SET @ErrorMessage = '数据库'+@dbname+'没有完全备份历史记录!!' + 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 = '数据库'+@dbname+'完全备份文件不存在!做差异备份无意义!' + CHAR(13) + CHAR(10)
RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
return
end
end
--隐藏检查目录
set @backupPath3=@backupPath2+'\'+'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+'\'+@dbname+'_'+@backuptype+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.diff'
backup database @dbname to disk=@FullPath
WITH buffercount = 30, maxtransfersize = 2097152 ,
COMPRESSION, DIFFERENTIAL,RETAINDAYS=8,NOFORMAT,NOINIT,
NAME=N'差异备份',SKIP,NOREWIND,
NOUNLOAD,STATS=10
set @backtype='I'
set @backupdesc='差异备份'
set @backupfilename=@FullPath
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 = '数据库'+@dbname+'差异备份未顺利完成！: ' + CHAR(13) + CHAR(10)
RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
return
end
print ' '
print '----------------------------------------------------------------------- '
print @dbname+'差异备份 '+@FullPath+' 已经完成!'
print '----------------------------------------------------------------------- '
return
end
--开始日志备份
else if @backuptype='log'
begin
print ' '
print '检查环境.....请稍等..'
print ' '
--检查数据库恢复模式
select @recovery_model_desc=recovery_model_desc from sys.databases
where name=@dbname
if @recovery_model_desc not in ('full')
begin
print '########错误信息######################################################'
print ' '+char(13)+'请检查数据库'+@dbname+'的恢复模式!'+char(13)+ '使用命令ALTER DATABASE'+@dbname+' 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 a.dbname=@dbname 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 a.dbname=@dbname 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 = '数据库'+@dbname+'没有完全备份或差异备份!: ' + CHAR(13) + CHAR(10)
RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
return
end
------------------------------------------------------------------------------
--隐藏检查目录
set @backupPath3=@backupPath2+'\'+'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+'\'+@dbname+'_'+@backuptype+'_'+replace(replace(replace(convert(varchar,getdate(),20),'-',''),' ',''),':','')+ '.trn'
backup log @dbname to disk=@FullPath WITH COMPRESSION,RETAINDAYS=3,NOFORMAT,NOINIT,
NAME=N'日志备份',SKIP,NOREWIND,
NOUNLOAD,STATS=10
set @backtype='L'
set @backupdesc='日志备份'
set @backupfilename=@FullPath
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 = '数据库'+@dbname+'日志备份未顺利完成！: ' + CHAR(13) + CHAR(10)
RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
return
end
print ' '
print '-------------------------------------------------------------------------'
print @dbname+'日志备份 '+@FullPath+' 已经完成!'
print '---------------------------------------------------------------------------'
return
end
set nocount off
GO
- 实战:sqlserver 2008 R2容灾方案:另一种思路-1
- 实战:sqlserver 2008 R2容灾方案:另一种思路-2
- 实战:监控sqlserver 2008 R2群集状态
- 实战:脚本监控sqlserver 2008 R2 replication性能
- 实战:windows server 2012 R2 不能安装 sqlserver 2008 R2的解决办法
- SQLServer-----SQLServer 2008 R2安装
- SQLServer-----SQLServer 2008 R2卸载
- sqlserver 2008 R2 审计
- sqlserver 2008 r2
- sqlserver 2008R2 连接服务器sqlserver 2014
- SQLServer-----SQLServer 2008 R2备份、还原数据库
- SQLServer 2008 R2附加数据库
- goldengate for sqlserver 2008 R2
- sqlserver 2008 R2资源管理器设置
- sqlserver 2008R2 异地备份
- sqlserver 2008 r2 表分区
- 关于sql server 2008 r2 展开时报错:参数名:viewInfo ( Microsoft SqlServer Management SqlStudio Explorer )解决思路
- win server 2012 r2 sqlserver 2008 r2 部署
- windows下安装Mysql最后一步start service失败
- 利用QT_DEBUG_PLUGINS检查Qt的插件问题
- log4j.properties配置详解
- Android学习及如何利用android来赚钱
- 在Ubuntu上为Android增加硬件抽象层（HAL）模块访问Linux内核驱动程序
- 实战:sqlserver 2008 R2容灾方案:另一种思路-1
- 在Ubuntu为Android硬件抽象层（HAL）模块编写JNI方法提供Java访问硬件服务接口
- 如何在Android应用中加入广告
- SharePoint 2003, 2007对上传文件的URL的长度限制
- 个税计算器python
- 使用MySQL主从服务器配置实现双机热备
- 在Ubuntu上为Android系统的Application Frameworks层增加硬件访问服务
- 在Ubuntu上为Android系统内置Java应用程序测试Application Frameworks层的硬件服务
- 对初学LoadRunner朋友的建意
