日期:2014-05-18 浏览次数:20522 次
declare @t table 
( 
num1 int 
,yunsuanfu1 varchar(10) 
,num2 int 
,yunsuanfu2 varchar(10) 
,num3 int 
,yunsuanfu3 varchar(10) 
,num4 int 
,yunsuanfu4 varchar(10) 
,num5 int 
) 
insert into @t values(1,'+',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'+',3,'*',4,null,null,null,null) 
insert into @t values(1,'+',3,'*',4,'+',5,null,null) 
insert into @t values(1,'-',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'*',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'/',3,'*',4,'+',5,'/',5) 
declare @sql varchar(8000)
select 
  @sql=isnull(@sql+' union all ','')+'select '+
  isnull(ltrim(num1),'')+isnull(yunsuanfu1,'')+
  isnull(ltrim(num2),'')+isnull(yunsuanfu2,'')+
  isnull(ltrim(num3),'')+isnull(yunsuanfu3,'')+
  isnull(ltrim(num4),'')+isnull(yunsuanfu4,'')+
  isnull(ltrim(num5),'')
 from @t
print @sql
exec(@sql)
/**
select 1+3*4+5/5 union all select 1+3*4 union all select 1+3*4+5 union all select 1-3*4+5/5 union all select 1*3*4+5/5 union all select 1/3*4+5/5
            
----------- 
14
13
18
-10
13
1
**/
------解决方案--------------------
create function f_calc(
@str varchar(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
declare @t table 
( 
num1 int 
,yunsuanfu1 varchar(10) 
,num2 int 
,yunsuanfu2 varchar(10) 
,num3 int 
,yunsuanfu3 varchar(10) 
,num4 int 
,yunsuanfu4 varchar(10) 
,num5 int 
) 
insert into @t values(1,'+',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'+',3,'*',4,null,null,null,null) 
insert into @t values(1,'+',3,'*',4,'+',5,null,null) 
insert into @t values(1,'-',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'*',3,'*',4,'+',5,'/',5) 
insert into @t values(1,'/',3,'*',4,'+',5,'/',5) 
select dbo.f_calc(ltrim(num1)+yunsuanfu1+ltrim(num2)+yunsuanfu2+ltrim(num3)+isnull(yunsuanfu3,'')+isnull(ltrim(num4),'')+isnull(yunsuanfu4,'')+isnull(ltrim(num5),'')) from @t 
drop function f_calc
/*
                                                                                                                                                                                                                                                                 
---------------------------------------------------------------------------------------------------------------- 
14
13
18
-10
13
2.33333333333333
*/