![\"image\"](\"https:\/\/www.csopro.de\/biblog\/wp-content\/uploads\/2015\/01\/image.png\" "\\"image\\"")
<\/a><\/p>\nalso:<\/p>\n
- \n
- Microsoft.SqlServer.DTSPipelineWrap<\/li>\n
- Microsoft.SqlServer.DTSRuntimeWrap<\/li>\n
- Microsoft.SqlServer.ManagedDTS<\/li>\n<\/ul>\n
Diese m\u00fcssen dann mit Imports (VB) bzw. using (c#) eingebunden werden \u2013 hier immer die VB-Beispiele:<\/p>\n
Imports System
\nImports Microsoft.SqlServer.Dts.Runtime
\nImports Microsoft.SqlServer.Dts.Pipeline.Wrapper
\nImports System.Runtime.InteropServices<\/em><\/p>\n<\/h1>\n
Paket laden<\/h1>\n
Als erstes wollen wir das SSIS-Paket laden und wieder speichern:<\/p>\n
Dim ssisApp As New Microsoft.SqlServer.Dts.Runtime.Application
\nDim pName As String = \u201cC:\\meineProjekte\\Paket.dtsx\u201d
\nDim package As New Package
\npackage = ssisApp.LoadPackage(pName, Nothing)
\nssisApp.SaveToXml(\u201cneuerName.dtsx\u201d, package, Nothing)<\/em><\/p>\nAlle Tasks ermitteln<\/h1>\n
Nun wollen wir in dem SSIS-Paket alle Tasks durchlaufen, um sie ver\u00e4ndern zu k\u00f6nnen. Dazu enth\u00e4lt das SSIS-Paket eine Property \u201cexecutables\u201d, diese enth\u00e4lt alle Tasks der ersten Ebene.<\/p>\n
Mit einer Schleife k\u00f6nnen wir diese durchlaufen:<\/p>\n
For Each e As Executable In package.executables
\nNext <\/em><\/p>\nAllerdings erreichen wir dabei nur die Tasks der ersten Ebene.<\/p>\n
In SSIS gibt es aber Tasks, die selber wieder Tasks beinhalten:<\/p>\n
- \n
- Sequence<\/li>\n
- For Each Loop<\/li>\n
- For Loop<\/li>\n<\/ul>\n
Diese interne Struktur kann man einfach in der SSIS-Umgebung anhand des Package Explorers sehen. In meinem Beispiel habe ich eine Sequence mit 2 Data Flows\u00a0 und nach der Sequence noch einen Data Flow (namens \u201cskript\u201d):<\/p>\n
![\"image\"](\"https:\/\/www.csopro.de\/biblog\/wp-content\/uploads\/2015\/01\/image_thumb1.png\" "\\"image\\"")
<\/a><\/p>\nUm alle Tasks durchlaufen zu k\u00f6nnen, m\u00fcssen wir also rekursiv vorgehen:<\/p>\n
im Hauptprogramm:<\/p>\n
\u2026
\nprocessAllExecutables(package.Executables, 1)<\/em>
\n\u2026<\/p>\nund dann als eigene Methode:<\/p>\n
Private Sub processAllExecutables(
\nByVal executables As Executables,
\nByVal depth As Integer)<\/em><\/p>\nFor Each e As Executable In executables
\n\u2026
\nDim d1 As Integer = depth + 1
\nIf TypeOf e Is ForLoop Then
\nprocessAllExecutables(CType(e, ForLoop).Executables, d1)
\nEnd If
\nIf TypeOf e Is Sequence Then
\nprocessAllExecutables(CType(e, Sequence).Executables, d1)
\nEnd If
\nIf TypeOf e Is ForEachLoop Then
\nprocessAllExecutables(CType(e, ForEachLoop).Executables, d1)
\nEnd If
\nNext
\nEnd Sub<\/p>\nWie man sieht, kann man \u00fcber TypeOf <\/em>\u2026 Is <<Typ>><\/em> abfragen, ob die Task e<\/em> einen bestimmten Typ hat. Bei den oben genannten Typen rufen wir dann die selbe Methode rekursiv auf \u2013 ich habe der \u00dcbersichtlichkeit halber die Tiefe als zus\u00e4tzlichen Parameter \u00fcbergeben, auch wenn das nicht unbedingt notwendig ist.<\/p>\n
Somit haben wir das Ziel des heutigen Blogs fast erreicht: Wir durchlaufen alle Tasks. Als n\u00e4chstes m\u00fcssen wir Data Flows erkennen und verarbeiten.<\/p>\n
DataFlows werden in der SSIS-API als TaskHost <\/em>bezeichnet. Deswegen k\u00f6nnen wir das so abpr\u00fcfen:<\/p>\n
If TypeOf e Is TaskHost Then
\n\u2026
\nEnd If<\/em><\/p>\nDamit haben wir eine Schleife \u00fcber alle Data Flows programmiert.<\/p>\n","protected":false},"excerpt":{"rendered":"
In einem vorangegangenen Eintrag hatte ich die Idee der Quarant\u00e4ne vorgestellt, f\u00fcr die wir ein VB-Programm geschrieben haben, das in einem SSIS-Paket das Fehlerhandling umstellt. DLLs einbinden Als erstes m\u00fcssen wir die folgenden DLLs einbinden: also: Microsoft.SqlServer.DTSPipelineWrap Microsoft.SqlServer.DTSRuntimeWrap Microsoft.SqlServer.ManagedDTS Diese m\u00fcssen dann mit Imports (VB) bzw. using (c#) eingebunden werden \u2013 hier immer die VB-Beispiele: … Quarantäne–Teil 1: Schleife über alle Data Flows<\/span> weiterlesen