Encripting Password after transfering acc.

When i have transfered all 99b accounts to 99.6x I had to encript all accounts so I have created this to make automatic and I thought it was good so I decided to share with you. I hope it helps.

Instructions: Before importing all accs to your MEMB_INFO table you can creat a new field called memb_passw. Import data and store passoword from old database MEMB_INFO.memb__pwd to the new field memb_passw. Use this script to creat repassowords procedure and run it.
It will store encripted passords from memb_passw to MEMB_INFO.memb__pwd.

Sry my bad english. Im brazilian.
=========================

USE [Muonline]
GO
/****** Object: StoredProcedure [dbo].[repasswords] Script Date: 08/15/2006 02:10:11 ******/
/****** By Limpamesa ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO


CREATE PROCEDURE [dbo].[repasswords]
AS

DECLARE @ACC INT,@SENHA VARCHAR(10),@CONTA VARCHAR(10),@cnt int

set @cnt = 0
DECLARE LISTA CURSOR LOCAL FOR
SELECT memb_guid FROM dbo.MEMB_INFO

OPEN LISTA
FETCH NEXT FROM LISTA INTO @ACC
WHILE @@FETCH_STATUS = 0
BEGIN

SET @CONTA=(SELECT memb___id FROM MEMB_INFO WHERE memb_guid=@ACC)
SET @SENHA=(SELECT memb_passw FROM MEMB_INFO WHERE memb_guid=@ACC)

BEGIN
BEGIN TRANSACTION
SET NOCOUNT ON

EXECUTE Encripta @SENHA, @CONTA
set @cnt = @cnt + 1
print convert(varchar,@cnt) + ') ' + @CONTA+ ' SENHA = '+@SENHA

IF(@@Error <> 0 )
ROLLBACK TRANSACTION
ELSE
COMMIT TRANSACTION

SET NOCOUNT OFF
END

FETCH NEXT FROM LISTA INTO @ACC
END
CLOSE LISTA
DEALLOCATE LISTA

Resourse:
RageZone