VB.NET Windows 응용 프로그램에서 SSIS 패키지를 실행하는 방법은 무엇입니까?

Question

Windows 2005 VB 응용 프로그램에서 SQL dtsx 패키지를 실행할 수 있습니까?

그렇다면 누군가가 나를 어떻게 보여 주거나 링크를 보낼 수 있습니까?
다음 지침에 따라 : http://www.bigresource.com/Tracker/Track-ms_sql-xAKCmQKI/하지만 패키지 결과가 실패했습니다. dtsx가 로컬 시스템에 없기 때문에 이것이 가능합니까? 패키지는 aok 자체로 작동합니다. DTS_E_PRODUCTLEVELTOLOW 오류 코드에 관한

Answer 1

-, 당신이 파일 Microsoft.SqlServer.ManagedDTS.dll을 찾아 당신의 비주얼 스튜디오 프로젝트에이 자원을 추가 할 필요가 http://blogs.msdn.com/michen/archive/2006/11/11/ssis-product-level-is-insufficient.aspx

Answer 2

먼저 참조 :

1. 하는 당신은 할 수 있습니다 Visual Studio에서 Project --> Add
Reference... --> Browse으로 이동하여이 파일을 찾으십시오.이 파일을 찾으려면
   파일을 0으로 만드십시오.디렉토리. 당신이 (나에게 무슨 일이 있었는지입니다) 거기를 찾을 수없는 경우
   
   
   
2. , Windows에서 Run... 프롬프트로 이동 C:\Windows\assembly\gac_msil를 입력합니다. 그런 다음이 폴더의 검색 상자에 파일 이름 Microsoft.SqlServer.ManagedDTS.dll을 입력하십시오. 이 파일을 복사하여 더 쉽게 찾을 수있는 에 붙여넣고 위에 언급 한대로 Visual Studio 프로젝트에이 참조를 추가하십시오.

---

그래서, 지금 미친 것들 모두 이루어집니다, 여기 VB.NET에서 .dtsx SSIS 패키지를 실행하는 방법에 좋습니다. 이 다른 사람으로부터 아이디어를 가지고 나보다 똑똑한 사람의 도움으로, 안된 스마트 ) :

Protected Friend Sub loadSSISPackage(ByVal packageFile As String) 

    If Me.fileExists(packageFile) AndAlso packageFile.EndsWith(".dtsx") Then 
     Dim pkg As New Microsoft.SqlServer.Dts.Runtime.Package 
     Dim app As New Microsoft.SqlServer.Dts.Runtime.Application 
     Dim pkgResults As Microsoft.SqlServer.Dts.Runtime.DTSExecResult 

     pkg = app.LoadPackage(packageFile, Nothing) 
     pkgResults = pkg.Execute() 
     MsgBox(pkgResults.ToString()) 
    Else 
     Environment.Exit(-1) 
    End If 
End Sub 

Answer 3

당신은 또한 참조를 설정해야합니다

(수입 Microsoft.SqlServer .Dts는)

import Microsoft.SqlServer.Dts 

Protected Friend Sub loadSSISPackage(ByVal packageFile As String) 
    If Me.fileExists(packageFile) AndAlso packageFile.EndsWith(".dtsx") Then 
     Dim pkg As New Microsoft.SqlServer.Dts.Runtime.Package 
     Dim app As New Microsoft.SqlServer.Dts.Runtime.Application 
     Dim pkgResults As Microsoft.SqlServer.Dts.Runtime.DTSExecResult 

     pkg = app.LoadPackage(packageFile, Nothing) 
     pkgResults = pkg.Execute() 
     MsgBox(pkgResults.ToString()) 
    Else 
     Environment.Exit(-1) 
    End If 
End Sub