批量分离和附加数据库

 

use master
go
declare @detach nvarchar(4000)
set @detach=''
select @detach=@detach+char(13)+'exec sp_detach_db  '+quotename(Name)+',''true''' from master..sysdatabases   where  Name like 'Lonigo%'
and dbid>4
exec( @detach)
--EXEC sp_detach_db '+ @name+', '+ 'true'

go
use master
go
/**//***********************************************************************************************************************
說明：@file顯示格式為' E:\data',路徑有空格時加上雙引號如：'E:\"Data bak"'
        禁止數據庫名為'.'圓點。如：HR.hr.mdf/HR.hr.ldf 在文件名存在兩個圓點

功能：附加數據庫

***********************************************************************************************************************/
create proc DataAttach (@file nvarchar(100),@file1 nvarchar(100)=@file)
as

declare @mdf1 nvarchar(200),@mdf2 nvarchar(200),@ldf1 nvarchar(200),@ldf2 nvarchar(200)

select @mdf1='dir /b/o/s '+@file+'*.mdf',@ldf1='dir /b/o/s '+@file1+'*.ldf',
    @mdf2='dir /b/o '+@file+'*.mdf',@ldf2='dir /b/o '+@file1+'*.ldf'

if object_id('tempdb..#ta') is not null
    drop table #ta
create table #ta(ID int identity(1,1),FName nvarchar(256),DataName nvarchar(256))
insert #ta(FName) exec master..xp_cmdshell  @mdf1
insert #ta(FName) exec master..xp_cmdshell  @ldf1

if object_id('tempdb..#tb') is not null
    drop table #tb
create table #tb(ID int identity(1,1),FName nvarchar(256))
insert #tb(FName) exec master..xp_cmdshell  @mdf2
insert #tb(FName) exec master..xp_cmdshell  @ldf2

--EXECUTE master.dbo.xp_fileexist N'E:LonigoBrandAgencyLonigoBrandAgency_Data.MDF'

update a
set DataName=b.FName
 from #ta a join #tb b on reverse(left(reverse(a.FName),charindex('',reverse(a.FName))-1))=b.FName

update #ta
set DataName=case     when charindex('_',DataName)>0 then     
                                        case when reverse(left(reverse(DataName),charindex('_',reverse(DataName))-1)) in('Data.MDF','log.LDF')
                                            then reverse(stuff(reverse(DataName),1,charindex('_',reverse(DataName)),''))
                                            else reverse(stuff(reverse(DataName),1,charindex('.',reverse(DataName)),'')) end
                else  left(DataName,charindex('.',DataName)-1) end
    


if (select count(1) from #ta a where exists(select 1 from master..sysdatabases where Name=a.DataName))>0
    begin
        declare @error nvarchar(1000)
        select @error=isnull(@error+',','')+DataName from  #ta a where exists(select 1 from master..sysdatabases where Name=a.DataName) group by DataName
        print '已存在數據庫 '+@error
    end

if  1>0
    begin
        declare @s nvarchar(4000),@s1 nvarchar(4000)
        set @s=''
        select  @s=@s+char(13)+
        'EXEC sp_attach_db @dbname = N'+quotename(DataName,'''')+', @filename1 = N'''+
        max(case when FName like '%.MDF' then FName else '' end)+''', @filename2 = N'''+
        max(case when FName like '%.LDF' then FName else '' end)+'''',@s1=isnull(@s1,'')+DataName+char(13)
        from #ta ta
        where FName is not null
        and  (select count(1) from #ta tc where DataName=ta.DataName)=2--記錄為2
        and not exists(select 1 from master..sysdatabases where Name=ta.DataName)
        group by DataName
        --print @s
        exec (@s)
    end

if @@error<>0
    print '附加失敗'+char(13)+@s1
else
    print '附加成功'+char(13)+@s1

go


select * from #ta

--exec DataAttach  'E:\LonigoData'