UDF Domain Name from Email Address

USE Northwind

DECLARE @EMAIL VARCHAR(255)
DECLARE @EMAILDOMAIN VARCHAR(255)

SET @EMAIL = 'shane@microsoft.com'
SET @EMAILDOMAIN = 
        SUBSTRING
                (
                @EMAIL,
                CHARINDEX('@',@EMAIL,1),
                LEN(@EMAIL)
                )

SELECT @EMAILDOMAIN

--CREATE FUNCTION GetEmailDomain
--(
--      @EMAIL VARCHAR(255)
--)
--RETURNS VARCHAR(255)
--AS
--BEGIN
--      RETURN SUBSTRING
--              (
--              @EMAIL,
--              CHARINDEX('@',@EMAIL,1),
--              LEN(@EMAIL)
--              )
--END


--SELECT dbo.GetEmailDomain
--              (
--              'shane@microsoft.com'
--              )
--RESULT: @microsoft.com

References

http://www.sqlteam.com/item.asp?ItemID=1955