MS SQL SERVER批量恢复BAK文件

---请先使用存储脚本生成存储过程
---调用存储过程

USE [master]
EXEC PROC_DBHY 'D:\databack\','D:\data\',2,2
GO
--调用的时候，请根据实际需要进行修改：
--第一个传入参数为指定备份文件所在路径，如D:\databack\
--第二个传入参数为数据文件存放路径，如D:\data\
--第三个传入参数：当需要直接取文件名称为数据库名称时，设置为2;
--第四个传入参数：还原数据库为2，删除数据库为1（请慎重使用）

--存储过程脚本

USE [master]
SET ANSI_NULLS ON
go
SET QUOTED_IDENTIFIER ON
go
CREATE PROCEDURE  [dbo].[PROC_DBHY]  (@DBWLLJ VARCHAR(MAX),@DBLJ VARCHAR(MAX),@j  int=1 ,  @D INT = 1 )
--ALTER PROCEDURE [dbo].[PROC_DBHY] ( @DBWLLJ VARCHAR(MAX) ,  @DBLJ VARCHAR(MAX) ,  @J INT = 1 ,  @D INT = 1 )
AS
DECLARE @DBNAME VARCHAR(MAX) ,
@CSQL VARCHAR(MAX) ,
@CSQL2 VARCHAR(MAX)
PRINT '-------------------------------------------------------------------------------------'
PRINT '**********************************开始生成还原语句***********************************'
IF EXISTS ( SELECT  id
FROM    tempdb..sysobjects
WHERE   id = OBJECT_ID('tempdb..#TB1') )
DROP TABLE #TB1
CREATE TABLE #TB1
( DBMC VARCHAR(MAX) ,
DBJ1 BIT ,
DBJ2 INT )
IF EXISTS ( SELECT  id
FROM    tempdb..sysobjects
WHERE   id = OBJECT_ID('tempdb..#TB2') )
DROP TABLE #TB2
CREATE TABLE #TB2
( NAME 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), )     ---判断临时表是否存在，存在就删除
SET @CSQL = '  INSERT INTO #TB1 exec master..xp_dirtree   ''' + @DBWLLJ + ''',1,1 '
EXEC (@CSQL) --PRINT @CSQL
ALTER TABLE  #TB1  ADD  KNAME VARCHAR(MAX),  DS  INT, DS1  INT
DELETE  #TB1
WHERE   DBJ2 = 0
OR DBMC NOT LIKE '%.BAK'
IF @J = 1
BEGIN
UPDATE #TB1
SET    DS1 = CHARINDEX('_backup', DBMC) - 1
WHERE  CHARINDEX('_backup', DBMC) > 1
UPDATE #TB1
SET    KNAME = SUBSTRING(DBMC, 1, DS1)
--PRINT 'CHU1'
END
IF @J = 2
BEGIN
UPDATE #TB1
SET    DS = CHARINDEX('.BAK', DBMC) - 1
WHERE  CHARINDEX('.BAK', DBMC) > 1
UPDATE #TB1
SET    KNAME = SUBSTRING(DBMC, 1, DS)
--PRINT 'CHU2'	  --获取逻辑文件名
END
ALTER TABLE  #TB1  ADD  NAME1 VARCHAR(MAX),NAME2  VARCHAR(MAX)
--SELECT * FROM #TB1
DECLARE LJWJM CURSOR
FOR
SELECT  DBMC
FROM    #TB1
OPEN LJWJM
FETCH NEXT FROM LJWJM INTO @DBNAME
WHILE ( @@FETCH_STATUS <> -1 )
BEGIN
SET @CSQL = 'INSERT INTO #TB2  Exec(''RESTORE FILELISTONLY FROM DISK =''''' + @DBWLLJ + @DBNAME + ''''''') '
EXEC (@CSQL)	--PRINT @CSQL
SET @CSQL2 = 'UPDATE #TB1 SET NAME1=(SELECT name FROM #TB2 WHERE Type=''D'') ,NAME2=(SELECT name FROM #TB2 WHERE Type=''L'')  WHERE  DBMC=''' + @DBNAME + ''''     --KNAME='''+@DBNAME+''''
EXEC (@CSQL2)   --PRINT @CSQL2
EXEC ('DELETE FROM #TB2')
FETCH NEXT FROM LJWJM INTO @DBNAME
END
CLOSE LJWJM
DEALLOCATE LJWJM
IF @D = 1
BEGIN
SELECT 'DROP  DATABASE  ' + KNAME
FROM   #TB1
END
ELSE
BEGIN
SELECT 'USE master'
UNION ALL
SELECT 'RESTORE DATABASE [' + KNAME + '] FROM DISK=N''' + @DBWLLJ + '' + DBMC + '''
WITH   replace,  MOVE  N''' + NAME1 + ''' TO N''' + @DBLJ + '' + KNAME + '.mdf'',
MOVE N''' + NAME2 + ''' TO N''' + @DBLJ + '' + KNAME + '_LOG.ldf'',
NOUNLOAD  , REPLACE
GO  '
FROM   #TB1
END
PRINT '-------------------------------------------------------------------------------------'
PRINT '-----**********************************生成语句成功***********************************-----'
GO