Если открыто для функции с табличным значением, учтите следующее.
Устали от извлечения строк (слева, справа, charindex, patindex, reverse и т. Д.), Я изменил функцию split / parse, чтобы принимать дване подобные разделители.В этом случае >
и </
Кроме того, будучи TVF, его легко включить в CROSS APPLY, если ваши данные находятся в таблице.
Пример
Declare @S varchar(max)='<HTML><HEAD><style type="text/css">BODY,TD,TH,BUTTON,INPUT,SELECT,TEXTAREA{FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial,Helvetica;}BODY{MARGIN: 5px;}P,DIV,UL,OL,BLOCKQUOTE{MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px;}</style></HEAD><BODY> <p style="MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px">Patient is a 84 year old female. Patient''s histpry includes the following:</p> <p style="MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px"> </p></BODY></HTML>'
Select *
From [dbo].[tvf-Str-Extract](replace(@S,' ',' '),'>','</')
Where RetVal<>' '
and RetVal not like 'BODY,%'
Возвраты
RetSeq RetPos RetVal
2 284 Patient is a 84 year old female. Patient's histpry includes the following:
Примечание: WHERE не является обязательным и может быть настроено для удовлетворения ваших реальных потребностей,Просто для удовольствия, попробуйте это без ГДЕ.Кроме того, в этом примере мы поймали в ловушку
, но, как вы знаете, может быть много других, например —
.
Функция, если она заинтересована
CREATE FUNCTION [dbo].[tvf-Str-Extract] (@String varchar(max),@Delimiter1 varchar(100),@Delimiter2 varchar(100))
Returns Table
As
Return (
with cte1(N) As (Select 1 From (Values(1),(1),(1),(1),(1),(1),(1),(1),(1),(1)) N(N)),
cte2(N) As (Select Top (IsNull(DataLength(@String),0)) Row_Number() over (Order By (Select NULL)) From (Select N=1 From cte1 N1,cte1 N2,cte1 N3,cte1 N4,cte1 N5,cte1 N6) A ),
cte3(N) As (Select 1 Union All Select t.N+DataLength(@Delimiter1) From cte2 t Where Substring(@String,t.N,DataLength(@Delimiter1)) = @Delimiter1),
cte4(N,L) As (Select S.N,IsNull(NullIf(CharIndex(@Delimiter1,@String,s.N),0)-S.N,8000) From cte3 S)
Select RetSeq = Row_Number() over (Order By N)
,RetPos = N
,RetVal = left(RetVal,charindex(@Delimiter2,RetVal)-1)
From (
Select *,RetVal = Substring(@String, N, L)
From cte4
) A
Where charindex(@Delimiter2,RetVal)>1
)
/*
Max Length of String 1MM characters
Declare @String varchar(max) = 'Dear [[FirstName]] [[LastName]], ...'
Select * From [dbo].[tvf-Str-Extract] (@String,'[[',']]')
*/