SQL动态计算出表中公式示例代码

最新推荐文章于 2024-07-03 19:01:25 发布

fengloveyun

最新推荐文章于 2024-07-03 19:01:25 发布

阅读量1.2k

点赞数

CC 4.0 BY-SA版权

分类专栏：数据库文章标签： sql vbscript function null object

本文链接：https://blog.youkuaiyun.com/fengloveyun/article/details/6214619

数据库专栏收录该内容

17 篇文章

订阅专栏

本文介绍了一个用于SQL环境中计算数学表达式的自定义函数f_calc。该函数能够解析并计算输入的字符串形式的数学表达式，并返回计算结果。如果遇到错误，如语法错误或类型不匹配，则返回详细的错误信息。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

 /*--调用示例
    select dbo.f_calc('123+456')
--*/

if object_id('f_calc') is not null
    drop function [dbo].[f_calc]
GO
create function f_calc(
@str nvarchar(1000)   --要计算的表达式
)returns sql_variant
as
begin
    declare @re sql_variant
    declare @err int,@src varchar(255),@desc varchar(255)
    declare @obj int
    exec @err=sp_oacreate 'MSScriptControl.ScriptControl',@obj out
    if @err<>0 goto lb_err
    exec @err=sp_oasetproperty @obj,'Language','vbscript'
    if @err<>0 goto lb_err
    exec @err=sp_oamethod @obj,'Eval',@re out,@str
    if @err=0 return(@re)
    lb_err:
    exec sp_oageterrorinfo NULL, @src out, @desc out 
    declare @errb varbinary(4),@s varchar(20)
    set @errb=cast(@err as varbinary(4))
    exec master..xp_varbintohexstr @errb,@s out
    return('错误号: '+@s+char(13)+'错误源: '+@src+char(13)+'错误描述: '+@desc)
end
go