欢迎投稿

今日深度:

如何还原某一个目录下的所有数据库备份文件((2)

●还原单个数据库的存储过程代码

根据上面分析的方法,这里演示我写的一个还原单个数据库的存储过程代码,因为代码是之前写的,中间因真实世界的特殊情况,修改成几个版本的存储过程。当然,如有可能,你可以根据自己所在的真实环境,修改对应部分的代码,以便满足自己的需要。

存储过程sp_RestoreDataBase代码:

  1. Use master 
  2. Go 
  3. if object_ID('[sp_restoredatabase]'is not null 
  4.     Drop Procedure [sp_restoredatabase] 
  5. Go 
  6. /* 
  7.     --还原数据库(v3.2) Andy 2011-2-22 
  8.     @DatabBaseBakPath nvarchar(260), --数据库备份路径(包含备份文件名) 
  9.     @DatabBaseNewPath nvarchar(260)  --新数据库路径 
  10.     @NewDataBaseName nvarchar(128)   --新数据库名 
  11.     e.g: 
  12.     --Exec sp_RestoreDataBase 'E:\DatabaseBackup\DE\Support_2008722_14_33_39.bak','D:\SQL2005\DE' 
  13.     V3.0版本修改说明: 
  14.         1.修正了之前版本在还原包含全文索引文件的时候发生的错误。 
  15.         2.修正了之前版本在还原包含多个数据库文件和日志文件时发生的错误。 
  16.     V3.1版本说明,增加了参数@Keep_Replication,表示是否保存复制设定 
  17.     V3.2版本说明,增加了FILE ={ file_number | @file_number } 逻辑判断,在包含多个备份组,还原最后一个备份组 
  18.     V3.3 版本说明 ,还原发生错误时返回 1 
  19. */ 
  20. CREATE Proc sp_RestoreDataBase 
  21.     @DatabBaseBakPath nvarchar(260), 
  22.     @DatabBaseNewPath nvarchar(260), 
  23.     @NewDataBaseName nvarchar(128)=null
  24.     @Keep_Replication bit=0 
  25. As 
  26.  
  27. Set Nocount On 
  28. Begin Try 
  29.     Declare 
  30.         @DataBaseName nvarchar(128), 
  31.         @Sql nvarchar(max), 
  32.         @SqlDatabaseRename nvarchar(max), 
  33.         @Enter nvarchar(10) 
  34.     --检查文件路径是否正确 
  35.     Declare 
  36.         @Dir nvarchar(4000), 
  37.         @i int 
  38. --    Set @Dir='Dir '+@DatabBaseBakPath 
  39. --    Exec @i=xp_cmdshell  @Dir,no_output 
  40. --    If @i<>0     
  41.     Exec master.dbo.xp_fileexist @DatabBaseBakPath,@i Output 
  42.     If @i=0 
  43.     Begin 
  44.         Raiserror 50001 N'无效的备份数据库路径/文件名!' 
  45.         Return 1 
  46.     End 
  47.      
  48.     If Charindex('\\',@DatabBaseNewPath)>0 
  49.     Begin 
  50.         Raiserror 50001 N'数据库还原路径中不能含有''\\''!' 
  51.         Return 1 
  52.     End   
  53.     If Right(Rtrim(@DatabBaseNewPath),1)='\' 
  54.     Begin 
  55.         Raiserror 50001 N'数据库还原路径的最后一位能含有''\''!' 
  56.         Return 1 
  57.     End 
  58.     Set @Dir='Dir '+@DatabBaseNewPath 
  59.     Exec @i=xp_cmdshell  @Dir,no_output 
  60.     If @i<>0 
  61.     Begin 
  62.         Raiserror 50001 N'无效的数据库还原路径!' 
  63.         Return 1 
  64.     End 
  65.     set @DatabBaseNewPath=replace(@DatabBaseNewPath,'"',''
  66.     /* 
  67.     --SQL Server 2005 
  68.     Declare @BakFileList Table(LogicalName nvarchar(128),PhysicalName nvarchar(260),Type char(1),FileGroupName nvarchar(128),Size numeric(20,0),MaxSize numeric(20,0),FileID bigint,CreateLSN numeric(25,0),DropLSN numeric(25,0) NULL,UniqueID uniqueidentifier,ReadOnlyLSN numeric(25,0) NULL,ReadWriteLSN numeric(25,0) NULL,BackupSizeInBytes bigint,SourceBlockSize int,FileGroupID int,LogGroupGUID uniqueidentifier NULL,DifferentialBaseLSN numeric(25,0) NULL,DifferentialBaseGUID uniqueidentifier,IsReadOnly bit,IsPresent bit
  69.     */ 
  70.     --SQL Server 2008 
  71.     Declare @BakFileList Table(LogicalName nvarchar(128),PhysicalName nvarchar(260),Type char(1),FileGroupName nvarchar(128),Size numeric(20,0),MaxSize numeric(20,0),FileID bigint,CreateLSN numeric(25,0),DropLSN numeric(25,0) NULL,UniqueID uniqueidentifier,ReadOnlyLSN numeric(25,0) NULL,ReadWriteLSN numeric(25,0) NULL,BackupSizeInBytes bigint,SourceBlockSize int,FileGroupID int,LogGroupGUID uniqueidentifier NULL,DifferentialBaseLSN numeric(25,0) NULL,DifferentialBaseGUID uniqueidentifier,IsReadOnly bit,IsPresent bit,TDEThumbprint varbinary(32)) 
  72.     Insert Into @BakFileList 
  73.         Exec sp_executesql N'Restore FileListOnly From Disk=@DatabBaseBakPath',N'@DatabBaseBakPath nvarchar(260)',@DatabBaseBakPath 
  74.     /* 
  75.     --SQL Server 2005 
  76.     Declare @BakHeaderInfo Table(BackupName nvarchar(128),BackupDescription nvarchar(255),BackupType smallint,ExpirationDate datetime,Compressed tinyint,Position smallint,DeviceType tinyint,UserName nvarchar(128),ServerName nvarchar(128),DatabaseName nvarchar(128),DatabaseVersion int,DatabaseCreationDate datetime,BackupSize numeric(20,0),FirstLSN numeric(25,0),LastLSN numeric(25,0),CheckpointLSN numeric(25,0),DatabaseBackupLSN numeric(25,0),BackupStartDate datetime,BackupFinishDate datetime,SortOrder smallint,CodePage smallint,UnicodeLocaleId int,UnicodeComparisonStyle int,CompatibilityLevel tinyint,SoftwareVendorId int,SoftwareVersionMajor int,SoftwareVersionMinor int,SoftwareVersionBuild int,MachineName nvarchar(128),Flags int,BindingID uniqueidentifier,RecoveryForkID uniqueidentifier,Collation nvarchar(128),FamilyGUID uniqueidentifier,HasBulkLoggedData bit,IsSnapshot bit,IsReadOnly bit,IsSingleUser bit,HasBackupChecksums bit,IsDamaged bit,BeginsLogChain bit,HasIncompleteMetaData bit,IsForceOffline bit,IsCopyOnly bit,FirstRecoveryForkID uniqueidentifier,ForkPointLSN numeric(25,0) NULL,RecoveryModel nvarchar(60),DifferentialBaseLSN numeric(25,0) NULL,DifferentialBaseGUID uniqueidentifier,BackupTypeDescription nvarchar(60),BackupSetGUID uniqueidentifier NULL
  77.     */ 
  78.     --SQL Server 2008 
  79.     Declare @BakHeaderInfo Table(BackupName nvarchar(128),BackupDescription nvarchar(255),BackupType smallint,ExpirationDate datetime,Compressed tinyint,Position smallint,DeviceType tinyint,UserName nvarchar(128),ServerName nvarchar(128),DatabaseName nvarchar(128),DatabaseVersion int,DatabaseCreationDate datetime,BackupSize numeric(20,0),FirstLSN numeric(25,0),LastLSN numeric(25,0),CheckpointLSN numeric(25,0),DatabaseBackupLSN numeric(25,0),BackupStartDate datetime,BackupFinishDate datetime,SortOrder smallint,CodePage smallint,UnicodeLocaleId int,UnicodeComparisonStyle int,CompatibilityLevel tinyint,SoftwareVendorId int,SoftwareVersionMajor int,SoftwareVersionMinor int,SoftwareVersionBuild int,MachineName nvarchar(128),Flags int,BindingID uniqueidentifier,RecoveryForkID uniqueidentifier,Collation nvarchar(128),FamilyGUID uniqueidentifier,HasBulkLoggedData bit,IsSnapshot bit,IsReadOnly bit,IsSingleUser bit,HasBackupChecksums bit,IsDamaged bit,BeginsLogChain bit,HasIncompleteMetaData bit,IsForceOffline bit,IsCopyOnly bit,FirstRecoveryForkID uniqueidentifier,ForkPointLSN numeric(25,0) NULL,RecoveryModel nvarchar(60),DifferentialBaseLSN numeric(25,0) NULL,DifferentialBaseGUID uniqueidentifier,BackupTypeDescription nvarchar(60),BackupSetGUID uniqueidentifier NULL,CompressedBackupSize numeric(20,0)) 
  80.     Insert Into @BakHeaderInfo 
  81.         Exec sp_executesql N'Restore HeaderOnly From Disk=@DatabBaseBakPath',N'@DatabBaseBakPath nvarchar(260)',@DatabBaseBakPath 
  82.   
  83.      
  84.     If Isnull(@NewDataBaseName,'')>'' --使用新的数据库名,要是沒有指定就使用原來的数据库名 
  85.         Set @DataBaseName=@NewDataBaseName 
  86.     Else 
  87.     Begin   
  88.         Select @DataBaseName=DatabaseName From @BakHeaderInfo 
  89.     End 
  90.   
  91.      
  92.     Set @Enter=char(13)+Char(10) 
  93.     Select @Sql=Isnull(@Sql+@Enter,'')+'Kill '+Rtrim(spid) From master.sys.sysprocesses Where dbid=db_id(@DataBaseName) 
  94.     Exec(@Sql) 
  95.      
  96.     Set @Sql=N'Restore DataBase @DataBaseName From Disk=@DatabBaseBakPath With File=??,' --+(Select 'File='+rtrim(max(Position))+', ' From @BakHeaderInfo) 
  97.   
  98.     Select  @Sql=@Sql+'Move '''+LogicalName+''' To '''+@DatabBaseNewPath+'\'+@DataBaseName+ 
  99.             Case 
  100.                 When [Type]='D' And Not Exists(Select 1 From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) Then '' 
  101.                 When [Type]='D' Then '_'+(Select Rtrim(Count(*)) From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) 
  102.                 When [Type]='L' And Not Exists(Select 1 From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) Then '_Log' 
  103.                 When [Type]='L' Then '_Log'+(Select Rtrim(Count(*)) From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) 
  104.                 Else '' 
  105.             End+Right(PhysicalName,Charindex('.',Reverse(PhysicalName)))+''','
  106.             @SqlDatabaseRename=Isnull(@SqlDatabaseRename+@Enter,'')+ 
  107.                 Case 
  108.                     When [Type]='D' And LogicalName=@DataBaseName Then '' 
  109.                     When [Type]='D' And LogicalName Like @DataBaseName+'[_]%' Then '' 
  110.                     When [Type]='L' And LogicalName Like @DataBaseName+'[_]Log%' Then '' 
  111.                     When [Type]='F' Then '' 
  112.                     Else 
  113.                         'Alter DataBase '+Quotename(@DataBaseName)+' Modify File(Name='''+LogicalName+''',NewName='''+@DataBaseName+ 
  114.                         Case 
  115.                             When [Type]='D' And Not Exists(Select 1 From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) Then '' 
  116.                             When [Type]='D' Then '_'+(Select Rtrim(Count(*)) From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) 
  117.                             When [Type]='L' And Not Exists(Select 1 From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) Then '_Log' 
  118.                             When [Type]='L' Then '_Log'+(Select Rtrim(Count(*)) From @BakFileList Where [Type]=a.[Type] And FileID<a.FileID) 
  119.                             Else '' 
  120.                         End+''')' 
  121.                 End 
  122.         From @BakFileList As a 
  123.      
  124.      
  125.     Set @Sql=@Sql+'Replace' 
  126.      
  127.     If @Keep_Replication=1 
  128.         Set @Sql=@Sql+'Keep_Replication' 
  129.      
  130.     Declare @sql1 nvarchar(max), 
  131.             @MaxPosition int 
  132.      
  133.     Select @MaxPosition=Position 
  134.         From @BakHeaderInfo As a 
  135.         Where a.BackupType=1 
  136.                 And Not Exists(Select 1 From @BakHeaderInfo Where BackupType=a.BackupType And Position>a.Position) 
  137.      
  138.      
  139.     Select @sql1=isnull(@sql1+char(13)+char(10),'')+replace(@sql,'??',rtrim(Position)) + 
  140.             Case When Exists(Select 1 From @BakHeaderInfo Where Position>a.Position) Then N',Norecovery' Else N',Recovery' End 
  141.         From @BakHeaderInfo As a 
  142.         Where Position>=@MaxPosition 
  143.         Order By Position 
  144.          
  145.     Print '还原数据库: '+@DataBaseName 
  146.   
  147.      
  148. --    Print @sql1 
  149.     Exec sp_executesql @sql1,N'@DataBaseName nvarchar(128),@DatabBaseBakPath nvarchar(260)',@DataBaseName,@DatabBaseBakPath 
  150.   
  151.     If @SqlDatabaseRename>'' 
  152.         Exec(@SqlDatabaseRename) 
  153.   
  154. End Try 
  155. Begin Catch 
  156.     Declare @Error nvarchar(1024) 
  157.     Set @Error=ERROR_MESSAGE() 
  158.     Raiserror 50001 @Error 
  159.     Return 1 
  160. End Catch 
  161.     Set Nocount Off 
  162.   
  163.   
  164. Go 

存储过程测试:

  1. use master 
  2. Go 
  3. Exec dbo.sp_RestoreDataBase 'E:\DBBackup\dbA2011-09-05.bak','E:\DATA\SQL2008DE01' 
  4. go 


www.htsjk.Com true http://www.htsjk.com/shujukugl/17753.html NewsArticle ●还原单个数据库的存储过程代码 根据上面分析的方法,这里演示我写的一个还原单个数据库的存储过程代码,因为代码是之前写的,中间因真实世界的...
评论暂时关闭