[存储过程] 在SQL Server的存储过程中调用Com组件

发布时间:2010年01月27日      浏览次数:360 次
SQL server 的 T-Sql 语言的功能是 非常的强大,但是有个时候 也确实是有些限制和
不方便,为什么不象 asp 一样 大量的借用组件呢?开始在 Sql online book 中查找,终于找
到了 一个 Sql 的 系统存储过程 sp_OACreate,下面大家就一起去 看看这个 存储过程的神
   s首先我们先用VB 作一个最简单的组件 ,因为是介绍性的文章,所以这个组件是非常的
   工作中,可以写个 比这个 业务复杂的多的 组件
   Project Name: testSQLCOM
   Class Name: TestMath
   Public Function AddMe(a As Long, b As Long) As Long
   AddMe = a + b
   End Function
   编译生成后,我们就可以在 Sql Server 中对这个 Com 组件进行调用了
   declare @i int
   declare @intRet int
   declare @intRetCode int
   DECLARE @strErr varchar (255)
   DECLARE @strErr1 varchar (255)
   /* 首先创建Com 实例 */
   exec @ret_code = sp_OACreate "testSQLCOM.TestMath", @i out
   IF @intRetCode <> 0
   BEGIN
   /* 创建实例 失败 */
   EXEC sp_OAGetErrorInfo @i, @strErr OUT, @strErr1 OUT
   PRINT "创建实例失败,失败的原因是:: " + @strErr + " " + @strErr1
   RETURN
   END
   /* 创建成功,开始调用 */
   EXEC @intRetCode = sp_OAMethod @i,'AddMe',@ret OUT,100,200
   IF @intRetCode <> 0
   BEGIN
   /* 调用方法出错 */
   EXEC sp_OAGetErrorInfo @i, @strErr OUT, @strErr1 OUT
   PRINT "调用方法失败,失败的原因是:: " + @strErr + " " + @strErr1
   EXEC sp_OADestroy @i
   RETURN
   END
   PRINT "返回的结果是" + Str(@intRet)
   exec sp_OADestroy @i
   以前是存储过程的输出
   Step 4:
   返回的结果是 300
免责声明:本站相关技术文章信息部分来自网络,目的主要是传播更多信息,如果您认为本站的某些信息侵犯了您的版权,请与我们联系,我们会即时妥善的处理,谢谢合作!