【转载SQLServer自定义函数】【叶子函数分享一】去除字符串中的html标记及标记中的内容

时　间:2015-03-24 08:21:42
作　者:金宇   ID：43  城市：江阴
摘　要:SQLServer自定义函数去除字符串中的html标记及标记中的内容
正　文:

create function [dbo].[clearhtml_V2] (@maco varchar(8000))

returns varchar(8000)
as
begin
    declare @randchar_one nvarchar(200)
    declare @randchar_two nvarchar(200)
       if(charindex('<<',@maco)>0)
              begin
                     set @randchar_one='D4678B36-B958-4274-B81E-BBA636CFB427';
                     set @randchar_two='49E374CC-9E1A-4850-897C-27074DE32E7F';
                     set @maco=replace(@maco,'<<',@randchar_one)
                     set @maco=replace(@maco,'>>',@randchar_two)
              end
    declare @i int
    while 1 = 1
    begin
       set @i=len(@maco)
       set @maco=replace(@maco, substring(@maco,charindex('<',@maco),
       charindex('>',@maco)-charindex('<',@maco)+1),space(0))
       if @i=len( @maco )
       break
    end
 
    set @maco=replace(@maco,' ','')
    set @maco=replace(@maco,'&nbsp;','')
    set @maco=ltrim(rtrim(@maco))
    set @maco=replace(@maco,char(9),'')
    set @maco=replace(@maco,char(10),'')
    set @maco=replace(@maco,char(13),'')
    if(charindex(@randchar_one,@maco)>0)
    begin
       set @maco=replace(@maco,'D4678B36-B958-4274-B81E-BBA636CFB427','<<')
       set @maco=replace(@maco,'49E374CC-9E1A-4850-897C-27074DE32E7F','>>')
    end
    return (@maco)
end
 
select dbo.clearhtml_V2('<p>aaaa</p><<本草纲目>><a href="www.baidu.com" />')
--运行结果：
/*
aaaa<<本草纲目>>

*/

来源：http://blog.csdn.net/maco_wang/article/details/6254946

Access软件网官方交流QQ群 (群号:54525238) 　　　　　　Access源码网店