ITPub博客

首页 > 数据库 > SQL Server > 在 SQL Server 的存储过程中调用 Com 组件 (转)

在 SQL Server 的存储过程中调用 Com 组件 (转)

原创 SQL Server 作者:worldblog 时间:2007-12-05 10:16:15 0 删除 编辑
在 SQL Server 的存储过程中调用 Com 组件 (转)[@more@]

sql SERVER 的存储过程中调用 com 组件

关键词:SQL SERVER

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


/**
 ***
 豆腐制作 都是精品
 http://www.ASP888.NET 豆腐技术站
 如转载 请 注明出处
 */

 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


来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10752043/viewspace-988586/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论
  • 博文量
    6241
  • 访问量
    2411002