批量导出存储在msdb库的SSIS包
admin
2023-05-24 20:44:35
0

use msdb  
go


IF OBJECT_ID('msdb.dbo.usp_ExportSSISPkgs') IS NOT NULL  
  DROP PROCEDURE dbo.usp_ExportSSISPkgs;    
go


CREATE PROCEDURE dbo.usp_ExportSSISPkgs  
@exportPath NVARCHAR(2000)='D:\temp\'    
AS    
BEGIN

  DECLARE @pkgData XML, @pkgName NVARCHAR(1000),@pkgFolder NVARCHAR(4000), @cmd NVARCHAR(MAX) ;  
  PRINT '--Info: Create temp tables.';    
  IF (OBJECT_ID('tempdb.dbo.tbl_SSISPkgXML') IS NOT NULL)    
  BEGIN    
    PRINT '--Info: Drop existing temp table tempdb.dbo.tbl_SSISPkgXML.';    
    DROP TABLE tempdb.dbo.tbl_SSISPkgXML;    
  END    
  CREATE TABLE tempdb.dbo.tbl_SSISPkgXML(ID INT IDENTITY(1,1), PkgName NVARCHAR(1000) NULL, PkgFolder NVARCHAR(MAX) NULL,    
           PkgID VARCHAR(40) NULL,PkgData XML NULL);    
 

  PRINT '--Info: Insert Package data into tempdb.dbo.tbl_SSISPkgXML.';  
  IF (SELECT CHARINDEX('SQL Server 2005', @@VERSION))>0    
  --2005 version    
  BEGIN    
    --Use recursive CTE to get FULL path for SSIS packages on msdb    
    SET @cmd='WITH tbl_ssispkgfolder (FullPath, folderid)    
AS    
(SELECT CONVERT(NVARCHAR(MAX),''\root''),folderid FROM msdb.dbo.sysdtspackagefolders90    
  WHERE parentfolderid IS NULL    
  UNION ALL    
  SELECT CONVERT(NVARCHAR(MAX),t.FullPath+''\''+s.foldername),s.folderid    
  FROM msdb.dbo.sysdtspackagefolders90 s    
  JOIN tbl_ssispkgfolder t ON s.parentfolderid=t.folderid)    
    INSERT INTO tempdb.dbo.tbl_SSISPkgXML (PkgName,PkgID,PkgFolder,PkgData)    
      SELECT p.name, p.id, f.FullPath, CAST(CAST(packagedata AS varbinary(MAX)) AS XML)    
   FROM msdb.dbo.sysdtspackages90 p JOIN tbl_ssispkgfolder f ON p.folderid=f.folderid;';    
      EXEC(@cmd);    
  END    
  ELSE    
  --2008 or later version    
  BEGIN    
     SET @cmd='WITH tbl_ssispkgfolder (FullPath, folderid)    
AS    
(SELECT CONVERT(NVARCHAR(MAX),''\root''),folderid FROM msdb.dbo.sysssispackagefolders    
  WHERE parentfolderid IS NULL    
  UNION ALL    
  SELECT CONVERT(NVARCHAR(MAX),t.FullPath+''\''+s.foldername),s.folderid    
  FROM msdb.dbo.sysssispackagefolders s    
  JOIN tbl_ssispkgfolder t ON s.parentfolderid=t.folderid)    
    INSERT INTO tempdb.dbo.tbl_SSISPkgXML (PkgName,PkgID,PkgFolder,PkgData)    
      SELECT p.name, p.id, f.FullPath, CAST(CAST(packagedata AS varbinary(MAX)) AS XML)    
   FROM msdb.dbo.sysssispackages p JOIN tbl_ssispkgfolder f ON p.folderid=f.folderid    
      WHERE ISNULL(p.description,'''''''') NOT LIKE ''System Data Collector Package''    
      ;';    
      EXEC(@cmd);    
  END

  PRINT '--Info: Enable xp_cmdshell to allow access File System from SQL Engine';  
  EXEC sp_configure 'show advanced options',1;    
  RECONFIGURE WITH OVERRIDE;    
  EXEC sp_configure 'xp_cmdshell',1;    
  RECONFIGURE WITH OVERRIDE;

  PRINT '--Info: Start exporting...'  
  DECLARE cur_DtsxFile CURSOR FOR SELECT PkgName,PkgData, PkgFolder FROM tempdb.dbo.tbl_SSISPkgXML;    
  OPEN cur_DtsxFile;    
  FETCH NEXT FROM cur_DtsxFile INTO @pkgName, @pkgData, @pkgFolder;    
  WHILE (@@FETCH_STATUS=0)    
  BEGIN    
    PRINT '--Info: Create Package folder under '+@exportPath+ '';    
    SET @cmd= N'EXEC xp_cmdshell N''mkdir "' + @exportPath +@pkgFolder+ '\"''';    
    EXEC(@cmd);    
    SET @cmd=N'bcp "SELECT PkgData FROM tempdb.dbo.tbl_SSISPkgXML '    
   + 'WHERE PkgName=  '''''+@pkgName+''''' AND PkgFolder= '''''+@pkgFolder+'''''" queryout "'    
   + @exportPath+ @pkgFolder+ '\'+@pkgName+'.dtsx" -T -w -S"'+@@SERVERNAME+'"' ;    
    SET @cmd = N'EXEC xp_cmdshell N'''+@cmd +'''' ;    
    PRINT '--Info: Export package '+QUOTENAME(@pkgName)+' to ' + @exportPath +@pkgFolder+'';    
    EXEC(@cmd);    
    FETCH NEXT FROM cur_DtsxFile INTO @pkgName,@pkgData,@pkgFolder;    
  END    
  CLOSE cur_DtsxFile;    
  DEALLOCATE cur_DtsxFile;    

END



相关内容

热门资讯

蔡崇信前妻离婚后首亮相,和希拉... 当地时间8月3日晚,身为美国前国务卿兼前第一夫人的希拉里·克林顿,出现在纽约巴克莱中心,观看一场WN...
美国父亲发现11岁女儿遭性侵,... 8月4日消息,美国俄亥俄州爆出一桩极具争议的案件,一位父亲发现11岁女儿遭到侵害之后,没有第一时间完...
以总理:反对特朗普近期协议,哈... 据美联社当地时间8月4日报道,以色列总理内塔尼亚胡表示,在哈马斯完全解除武装之前,以色列军队不会从其...
美财长:本来还想写“和伊朗最高... 美国财政部长贝森特说,美国总统特朗普政府将“不惜一切代价”支持日本稳定汇市。他还幽默地回应了媒体拍到...
对伊战争消耗过大,美弹药库存告... 美伊战争已经持续近半年,战争大量消耗美军的关键弹药储备,西媒爆料称,美国弹药库存告急。美国总统特朗普...
华为E-band微波产品斩获2... 【CNMO科技消息】 近日,华为E-band微波产品RTN 3800凭借其卓越的设计理念和技术创新,...
原创 美... 当国际空间站走到退役那一天,能不能控制它撞向中国空间站?一些美国网络社区出现这种设想,乍看像在讨论航...
华灿光电:Micro LED通... 证券之星消息,华灿光电(300323)08月04日在投资者关系平台上答复投资者关心的问题。 投资者:...
济宁的破与立:产业蝶变万亿可期... 刚刚过去的7月,济宁有两件事将机器人产业推向了新的高度。一是7月9日,珞石机器人在港交所上市,这是山...
机器人企业TOP50发布,背后... 视频制作:实习生 余天雯 8月3日,DBC德本咨询联合CIW、eNet发布《2026中国科技机器人企...