if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[UFN_MD5_CHECKVALUE]') and xtype in (N'FN', N'IF', N'TF'))
drop function [dbo].[UFN_MD5_CHECKVALUE]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[UFN_MD5_ENCODEVALUE]') and xtype in (N'FN', N'IF', N'TF'))
drop function [dbo].[UFN_MD5_ENCODEVALUE]
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE FUNCTION UFN_MD5_CHECKVALUE
(
@btInStr VARCHAR(10),
@btInStrIndex VARCHAR(10),
@btInVal BINARY(16)
)
RETURNS TINYINT
AS
BEGIN
DECLARE @iOutResult TINYINT
EXEC master..XP_MD5_CheckValue @btInStr, @btInVal, @btInStrIndex, @iOutResult OUT
RETURN @iOutResult
END
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE FUNCTION UFN_MD5_ENCODEVALUE
(
@btInStr VARCHAR(10),
@btInStrIndex VARCHAR(10)
)
RETURNS BINARY(16)
AS
BEGIN
DECLARE @btOutVal BINARY(16)
EXEC master..XP_MD5_EncodeKeyVal @btInStr, @btInStrIndex, @btOutVal OUT
RETURN @btOutVal
END
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
7> Then Query it
8> After that del all line and copy these line to Query
CREATE PROCEDURE Encripta
@btInStr VARCHAR(10),
@btInStrIndex VARCHAR(10)
AS
BEGIN
DECLARE @btOutVal BINARY(16)
EXEC master..XP_MD5_EncodeKeyVal @btInStr, @btInStrIndex, @btOutVal OUT
UPDATE MEMB_INFO SET memb__pwd = @btOutVal WHERE memb___id = @btInStrIndex
END
GO