转至繁体中文版     | 网站首页 | 文章中心 | 下载中心 | 图片中心 | 笑话频道 | 教程频道 | 会员中心 | 雁过留声 | 
最新公告:     "MinTao学以致用网"欢迎您的光临,你的支持便是我们的动力,欢迎广大网友和各界人士亲临指导,你们的一个小小的建议便是我们发展的开路石!  [MinTao  2007年9月5日]        
您现在的位置: MinTao学以致用网 >> 文章中心 >> 电子课堂 >> 数据库 >> Sql Server >> 文章正文
专题栏目
更多内容
最新推荐 更多内容
相关文章
SQL2005-深入了解SSIS中
在SQL2005 轻松配置SSIS
SQL2005-SSIS 对同一个文
SQL2005 SSIS-在脚本组件
SQL2005 算术、字符运算
更多内容
SQL2005 SSIS-在脚本组件中访问数据连接         
SQL2005 SSIS-在脚本组件中访问数据连接
作者:AnyJack 文章来源:不详 点击数: 更新时间:2007-11-14 13:08:52

在上文中我们知道了如何在脚本组件中访问包变量,但在其中访问数据连接应该怎么办呢?
通过查看DTS类的属性我们知道其有一个 Connections 属性,其对应的正是SSIS设计面板中连接管理器中连接的映射
比如我们在连接管理器中建立一个 ADO.NET 的连接,命名为 connect1
那么在组件代码中我们就可以通过下面2种方式访问这个连接,如下
 Dts.Connections(0)
 或者
 Dts.Connections("connect1")

但是其并不是连接对象,不能直接作用于命令对象中,故需要强制转换为连接对象,如下代码:
    Dim sqlConn As SqlConnection
    sqlConn = CType(Dts.Connections(0).AcquireConnection(Nothing), SqlConnection)
  需要注意,不能直接CType(Dts.Connections(0), SqlConnection),需要用该对象的AcquireConnection方法获得一个连接,再强制转换
  
好了,现在已经转换为连接对象,你可以使用如下代码再该连接中执行命令
    Dim command As New SqlClient.SqlCommand
        command.Connection = sqlConn
        command.CommandType = CommandType.Text
        command.CommandText = "你的命令"
        command.ExecuteNonQuery()
        command = Nothing

本来到此就应该结束此文了,但是可惜的是还要继续下去

上面提到的是在连接管理器中建立一个ADO.NET的连接,如果你建立一个OLE.DB的连接,在运行上面代码,你会得到下面错误:  
  Unable to cast COM object of type ''''System.Data.OleDb.OleDbConnection'''' to class type ''''''''.
  Instances of types that represent COM components cannot be cast to types that do not represent COM components;
  however they can be cast to interfaces as long as the underlying COM component supports QueryInterface calls for the IID of the interface.
  
  上面的大概意思就是说,不能进行强制类型转换,当前对象没有提供这样的接口

明白了把,就是说不行,也就是说你建立的是OLE.DB连接,那么 AcquireConnection 方法返回的也是一个 OLE.DB的连接对象,你不能用SqlConnection去替代它

怎么办呢,解决方法有二
一是把OLE.DB连接对象的类型找出来,并引用上它,然后再用它强制转换,但是可惜的是我不知道怎么样才能。。。。;
二就是建立一个ADO.NET的连接好了,可是我又怕它是不是会比OLE.DB的连接处理速度要慢,所以之后通融一下了,代码如下

Public Class ScriptMain
 Public Sub Main()
        Dim command As New SqlClient.SqlCommand
        Dim cn As New SqlClient.SqlConnection
        MsgBox(Dts.Connections(0).ConnectionString)
        cn.ConnectionString = "" + Dts.Connections(0).ConnectionString
        cn.Open()
        MsgBox(Err.Description)
        command.Connection = cn
        command.CommandType = CommandType.Text
        command.CommandText = "insert into pay_dur(code) values(''''1'''')"
        command.ExecuteNonQuery()
        command = Nothing
        cn.Close()
 End Sub
 
好了,到此结束了,如果你知道第一种解决方法或者还有其他解决方法,还请指点,非常感谢 

文章录入:mintao    责任编辑:mintao 
  • 上一篇文章:

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007 MinTao学以致用网(www.mintao.net) Inc All Rights Reserved.
    QQ:543098146有事请Q我! QQ:261561092有事请Q我 QQ:179647303有事请Q我 MSN:min906@126.com
    站长:MinTao 信息产业部ICP备案号:鄂ICP备07500065号

    学以致用是我们学习者的至高境界和不懈追求,[MinTao学以致用网]与大家共同学习,共同进步……
    信息产业部备案
    *鄂ICP备07500065号