• 欢迎访问搞代码网站,推荐使用最新版火狐浏览器和Chrome浏览器访问本网站!
  • 如果您觉得本站非常有看点,那么赶紧使用Ctrl+D 收藏搞代码吧

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

sqlserver 搞代码 3年前 (2018-06-17) 87次浏览 已收录 0个评论

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

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

http://www.gaodaima.com/?p=36203SQL2005 SSIS-在脚本组件中访问包变量_sqlserver

 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

欢迎大家阅读《SQL2005 SSIS-在脚本组件中访问包变量_sqlserver,跪求各位点评,若觉得好的话请收藏本文,by 搞代码


喜欢 (0)
[搞代码]
分享 (0)
发表我的评论
取消评论

表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址