使用tsql从字符串中提取电子邮件地址

Question

我正在尝试从现有评论字段中提取电子邮件地址，并将其放入自己的列中。该字符串可能是这样的：“这是示例示例，电子邮件地址为[e-mail]”，或者从字面上看，电子邮件本身为“
[e-mail]”。

我认为最好的办法是找到’@’符号的索引并在两个方向上搜索，直到命中字符串的末尾或有空格为止。谁能帮我实现这一实现？

Answer 1

您可以'@'在字符串中搜索。然后，您在的LEFT和RIGHT端获取字符串'@'。那么你要REVERSE的LEFT一侧，并得到第一次出现' '则让SUBSTRING从那里。然后REVERSE获取原始表格。相同的原则适用于RIGHT不做任何事情的一方REVERSE。

示例字符串： 'some text [e-mail] some text'

1. LEFT =’一些文本someemail’
2. RIGHT =’@domain.org一些文字’
3. 反向LEFT =’liameemos txet emos’
4. SUBSTRING 直到第一个空格=’liameemos’
5. REVERSE（4）=一封电子邮件
6. SUBSTRING （2）直到第一个空格=’@ domain.org‘
7. 结合5和6 ='[e-mail]‘

您的查询将是：

;WITH CteEmail(email) AS(
    SELECT '[e-mail]' UNION ALL
    SELECT 'some text [e-mail] some text' UNION ALL
    SELECT 'no email'
)
,CteStrings AS(
    SELECT
        [Left] = LEFT(email, CHARINDEX('@', email, 0) - 1),
        Reverse_Left = REVERSE(LEFT(email, CHARINDEX('@', email, 0) - 1)),
        [Right] = RIGHT(email, CHARINDEX('@', email, 0) + 1)
    FROM CteEmail
    WHERE email LIKE '%@%'
)
SELECT *,
    REVERSE(
        SUBSTRING(Reverse_Left, 0, 
            CASE
                WHEN CHARINDEX(' ', Reverse_Left, 0) = 0 THEN LEN(Reverse_Left) + 1
                ELSE CHARINDEX(' ', Reverse_Left, 0)
            END
        )
    )
    +
    SUBSTRING([Right], 0,
        CASE
            WHEN CHARINDEX(' ', [Right], 0) = 0 THEN LEN([Right]) + 1
            ELSE CHARINDEX(' ', [Right], 0)
        END
    )
FROM CteStrings

样本数据：

email
----------------------------------------
[e-mail]
some text [e-mail] some text
no email

结果

---------------------
[e-mail]
[e-mail]