sqlserver利用sp_oa系列存储过程调用xml+xsl eval输出运算结果的一个例子。

CREATE   FUNCTION  getEval( @s   VARCHAR ( 100 ))
RETURNS   VARCHAR ( 100 )
AS
BEGIN

DECLARE   @xmlDoc   INT , @xslDoc   INT , @err   INT , @outValue   INT , @outStr   VARCHAR ( 100 )
DECLARE   @str   VARCHAR ( 1000 ), @xsl   VARCHAR ( 8000 )
SET   @str = ' <?xml version="1.0" encoding="utf-8"?>
<?xml-stylesheet type="text/xsl" href="test.xsl"?>
<root>
' + @s + ' </root> '

SET   @xsl = ' <?xml version="1.0" encoding="utf-8"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl">
<xsl:template match="/">
<xsl:script>
function eVal(node)
{
  return eval(node.selectSingleNode("//root").text);
}
</xsl:script>
<xsl:eval>eVal(this)</xsl:eval>
</xsl:template>
</xsl:stylesheet>
'

-- SELECT @str,@xsl
EXEC   @err = sp_OACreate  ' Msxml2.DOMDocument.3.0 ' , @xmlDoc  OUT
EXEC   @err = sp_OASetProperty  @xmlDoc , ' async ' , ' false '
EXEC   @err = sp_OAMethod  @xmlDoc , ' LoadXML ' , @outValue  OUT, @str
EXEC   @err = sp_OACreate  ' Msxml2.DOMDocument.3.0 ' , @xslDoc  OUT
EXEC   @err = sp_OASetProperty  @xslDoc , ' async ' , ' false '
EXEC   @err = sp_OASetProperty  @xmlDoc , ' resolveExternals ' , ' false '
EXEC   @err = sp_OAMethod  @xslDoc , ' LoadXML ' , @outValue  OUT, @xsl
EXEC   @err = sp_OAMethod  @xmlDoc , ' transformNode ' , @outStr  OUT, @XslDoc
EXEC   @err = sp_OADestroy  @xmlDoc
EXEC   @err = sp_OADestroy  @xslDoc

RETURN   @outStr
END

GO


CREATE   TABLE  tb(id  INT   IDENTITY ( 1 , 1 ),v  VARCHAR ( 1000 ))
GO
INSERT  tb  SELECT   ' 1*2+3 '
UNION   ALL   SELECT   ' 2+3*5 '
UNION   ALL   SELECT   ' (2+3)*5 '
GO

SELECT  id,v,dbo.getEval(v)  FROM  tb
GO
/*1 1*2+3 5 
2 2+3*5 17 
3 (2+3)*5 25  */



DROP   TABLE  tb
GO

DROP   FUNCTION  getEval
GO
  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
DECLARE @Object int; DECLARE @HR int; DECLARE @Property nvarchar(255); DECLARE @Return nvarchar(255); DECLARE @Source nvarchar(255), @Desc nvarchar(255); DECLARE @httpStatus int; DECLARE @response varchar(8000); --创建 OLE 对象的实例 EXEC @HR = sp_OACreate N'MSXML2.XMLHTTP.6.0',@Object OUT; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('Error Creating COM Component 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO END_ROUTINE END BEGIN --Open EXEC @HR = sp_OAMethod @Object,N'open',Null,'GET','http://localhost:1728/HttpServer/submit.aspx',FALSE; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('Open 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END --setRequestHeader EXEC @HR = sp_OAMethod @Object,N'setRequestHeader',Null,'Content-Type','text/xml'; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('setRequestHeader 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END --send EXEC @HR = sp_OAMethod @Object,N'send',Null,''; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('send 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END --readyState EXEC @HR = sp_OAGetProperty @Object,'readyState', @httpStatus OUT; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('readyState 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END --verify status IF @httpStatus 4 BEGIN RAISERROR('readyState http status bad', 16,1) GOTO CLEANUP END --status EXEC @HR = sp_OAGetProperty @Object,'status', @httpStatus OUT; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('getstatus 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END --verify status IF @httpStatus 200 BEGIN Print Cast(@httpStatus As varchar) RAISERROR('Open http status bad', 16,1) GOTO CLEANUP END --responseText EXEC @HR = sp_OAGetProperty @Object, 'responseText', @response OUT IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; RAISERROR('responseText 0x%x, %s, %s',16,1, @HR, @Source, @Desc) GOTO CLEANUP END Print @response END CLEANUP: BEGIN EXEC @HR = sp_OADestroy @Object; IF @HR 0 BEGIN EXEC sp_OAGetErrorInfo @Object,@Source OUT,@Desc OUT; SELECT HR = convert(varbinary(4),@HR),Source=@Source,Description=@Desc; END END END_ROUTINE: RETURN; GO

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值