SQL Server的存储过程调用Com组件-数据库其他-idc中文资讯站-客观公证的IDC产业权威媒体,关注域名、虚拟主机、服务器、网络、开源技术资讯，整合运营商资源，客观评价各地机房带宽线路质量、IDC企业名录等信息

SQL Server的存储过程调用Com组件

来源：豆腐技术站作者：豆腐发布时间:2007-10-27 00:00:00

SQL server 的 T-Sql 语言的功能是很的强大，但是有个时候也确实是有些限制和不方便,一天，豆腐想为什么不象 asp 相同大量的借用组件呢？说干就干，我这就开始在 Sql online book 中查找，呵呵终于找到了一个 Sql 的系统存储过程 sp_OACreate,下面大家就和豆腐一起去看看这个存储过程的神气之处吧

　　首先我们先用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

　　我们在这篇文章中介绍了在 Sql server 中使用组件的方法，具体的帮助大家请查看 SQL Onlone Book

查看本文来源

喜欢本文，那就收藏到：