ALTER FUNCTION uf_XEncrupt (@src VARCHAR (128), @key VARCHAR (128))
RETURNS VARCHAR (128)
AS
BEGIN
DECLARE @encryptedvalue varchar(128),
@charpos smallint,
@srcpos smallint
SELECT @encryptedvalue = '',
@charpos = 1,
@srcpos = 1
WHILE (@charpos <= datalength(@src))
BEGIN
SELECT @encryptedvalue = @encryptedvalue + char(ascii(substring(@src, @charpos, 1) ) ^ ascii(substring(@key, @srcpos, 1))),
@charpos = @charpos + 1,
@srcpos = @srcpos + 1
IF @srcpos > len(@key)
SELECT @srcpos = 1
END
RETURN @encryptedvalue
END
Thanks
J. Kusch