SQL2005 SSIS-在脚本组件中访问包变量

要想在脚本组件中访问包变量，首先必须设置脚本组件2个属性的值,如下
ReadOnlyVariables
ReadWriteVariables
这2值指定了哪些变量可以访问，哪些变量可以改写（如有多个变量则用逗号分隔），如果你没有指定上面2个属性的值，则不能在脚本组件的代码中访问这2个变量

下面我举一个从文件中加载内容到包变量的一个例子
 1、首先我们定义2个变量 FileName 和 FileContents ，并指定其类型为 String
 2、拖曳一个脚本组件到控制面板上，并设置 ReadOnlyVariables和ReadWriteVariables 属性的值分别为 FileName 、FileContents
 3、设计脚本组件的代码，如下 
 

 Public Sub Main()
         Dim errorInfo As String = ""
         Dim Contents As String = ""
 
         Contents = GetFileContents(Dts.Variables("FileName").Value, errorInfo)
         If errorInfo.Length > 0 Then
             MsgBox(errorInfo, MsgBoxStyle.Critical, "Error")
             Dts.TaskResult = Dts.Results.Failure
         Else
             MsgBox(Contents, MsgBoxStyle.OKOnly, "File contents")
             Dts.Variables("FileContents").Value=Contents
             Dts.TaskResult = Dts.Results.Success
         End If
  End Sub

 Public Function GetFileContents(ByVal filePath As String, Optional ByVal ErrorInfo As String = "") As String
        Dim strContents As String
        Dim objReader As StreamReader
        Try
            objReader = New StreamReader(filePath)
            strContents = objReader.ReadToEnd()
            objReader.Close()
            Return strContents
        Catch Ex As Exception
            ErrorInfo = Ex.Message
        End Try
    End Function

Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（学习笔记） Inc All Rights Reserved.
闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18