変数をスクリプト変換エディタに渡す方法は？

Question

私のパッケージの変数をスクリプト変換エディタに渡したいと思います。下のRow.Reference1にこれをどのように追加しますか？ここで

は、私が使用するスクリプトです：スクリプト変換エディタの「スクリプト」ページで

Imports System 
Imports System.Data 
Imports System.Math 
Imports Microsoft.SqlServer.Dts.Pipeline.Wrapper 
Imports Microsoft.SqlServer.Dts.Runtime.Wrapper 

Public Class ScriptMain 
    Inherits UserComponent 

Public Overrides Sub Input0_ProcessInputRow(ByVal Row As Input0Buffer) 

     Row.Column1 = Tokenise(Row.Column0, "|", 1) 
     Row.Column2 = Tokenise(Row.Column0, "|", 2) 
     Row.Column3 = Tokenise(Row.Column0, "|", 3) 
     Row.Column4 = Tokenise(Row.Column0, "|", 4) 
     Row.Column5 = Tokenise(Row.Column0, "|", 5) 
     Row.Column6 = Tokenise(Row.Column0, "|", 6) 
     Row.Column7 = Tokenise(Row.Column0, "|", 7) 
     Row.Column8 = Tokenise(Row.Column0, "|", 8) 
     Row.Column9 = Tokenise(Row.Column0, "|", 9) 
     Row.Column10 = Tokenise(Row.Column0, "|", 10) 
     Row.Column11 = Tokenise(Row.Column0, "|", 11) 
     Row.Column12 = Tokenise(Row.Column0, "|", 12) 
     Row.Column13 = Tokenise(Row.Column0, "|", 13) 
     Row.Column14 = Tokenise(Row.Column0, "|", 14) 
     Row.Column15 = Tokenise(Row.Column0, "|", 15) 
     Row.Column16 = Tokenise(Row.Column0, "|", 16) 
     'Row.Reference1 = ??? 

    End Sub 

Private Function Tokenise(ByVal input As String, ByVal delimiter As String, ByVal token As Integer) As String 

     Dim tokenArray As String() 
     tokenArray = input.Split(delimiter.ToCharArray) 'Split the string by the delimiter 
     If tokenArray.Length < token Then 'Protect against a request for a token that doesn't exist 
      Return "" 
     Else 
      Return tokenArray(token - 1) 
     End If 
    End Function 
End Class 

Answer 1

、最後のセクションでは、「カスタムプロパティ」です。 ReadOnlyVariablesとReadWriteVariablesの2つのプロパティがあります。スクリプトで参照する変数のコンマ区切りリストに適切な変数を設定します。

[スクリプトの編集]ボタンをクリックすると、ComponentWrapper.vbで作成されたVariablesクラスに、変数の名前を持つプロパティが追加されます。読み取り専用の変数は読み取り専用のプロパティとして存在します。 ReadWrite変数は、ゲッターとセッターの両方のプロパティとして存在します。

次に、それらをたとえばVariables.TaskIDとして参照します。