当前位置: 首页 > 图文教程 > 数据库 > MSSQL > 在SQL Server的存储过程中调用Com组件

MSSQL
使用SQL Server索引视图来提高性能
步骤指南:移植SQL 2000 DTS到SSIS
怎样使你的SQL运行得更加灵活和高效
优化SQL Server数据库服务器内存配置
SQL SERVER优化建议
请注意那些容易被忽略的SQL注入技巧
SQL Server 2005密码安全追踪与存储
sql2000下 分页存储过程
SQL Server数据库安全管理经验谈
测试SQL Server的业务规则链接方法
SQL Server的有效安装
SQL Server灾难恢复:重创历史性数据
SQL Server2005发布元年 微软正身企业级应用
MS SQL "1813"错误产生的原因及解决
收藏几段SQL Server语句和存储过程
SQL Server 2005中的备份和恢复增强
如何用SQL Server查询累计值
浅析如何掌握SQL Server的锁机制
步骤指南:测试MSSQL有没有特洛伊木马
手工卸载SQL Server 2000数据库

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-30   浏览: 53 ::
收藏到网摘: n/a

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