亚洲成精品动漫久久精久,九九在线精品视频播放,黄色成人免费观看,三级成人影院,久碰久,四虎成人欧美精品在永久在线

掃一掃
關(guān)注微信公眾號(hào)

SQL Server的存儲(chǔ)過(guò)程調(diào)用Com組件
2006-04-07   網(wǎng)絡(luò)


/*--下面的部分在VB中完成首先我們先用VB 作一個(gè)最簡(jiǎn)單的組件

工程名稱: testSQLCOM
類名: TestMath

''函數(shù),計(jì)算兩個(gè)整數(shù)相加的結(jié)果
Public Function AddMe(a As Long, b As Long) As Long
AddMe = a + b
End Function

編譯生成后,我們就可以在 Sql Server 中對(duì)這個(gè) Com 組件進(jìn)行調(diào)用了
--*/

/*--下面是SQL中對(duì)上面DLL的調(diào)用--*/

--定義用到的變量
declare @err int,@src varchar(255),@desc varchar(255)
declare @obj int,@re int

--創(chuàng)建調(diào)用實(shí)例
exec @err=sp_OACreate ''testSQLCOM.TestMath'', @obj out
if @err<>0 goto lberr --如果創(chuàng)建失敗,則進(jìn)行錯(cuò)誤處理

--調(diào)用DLL中的函數(shù)
exec @err=sp_OAMethod @obj,''AddMe'',@re out,100,200
if @err<>0 goto lberr --如果調(diào)用錯(cuò)誤,則進(jìn)行錯(cuò)誤處理

print ''返回的結(jié)果是:'' + str(@re)

--完成后釋放
exec sp_OADestroy @obj

return

lberr:
exec sp_oageterrorinfo 0,@src out,@desc out
select cast(@err as varbinary(4)) as 錯(cuò)誤號(hào)
,@src as 錯(cuò)誤源,@desc as 錯(cuò)誤描述

熱詞搜索:

上一篇:用DHCP簡(jiǎn)化網(wǎng)絡(luò)管理
下一篇:Oracle維護(hù)常用SQL語(yǔ)句

分享到: 收藏