Erro no crypt

[salmeida 0]

Olá gente, estou com um erro no login, quando eu dou a senha do login ele me da sequencia de classe inválida... por favor me ajudem

 

Set Cryptor = Server.CreateObject ("AspCrypt.Crypt")pass = Cryptor.Crypt (user, pass) (ERRO NESTA LINHA)Set Cryptor = Nothingsql="select * from users where ((user='"+user+"') and (pass='"+pass+"'))"  set Result=Conexao.execute(sql)  x=0  do while (not result.eof) and (x=0)	x=x+1    loop  if x > 0 then

não sei o que tem de errado!

[Mário Monteiro 179]

vcoe tem este Crypt registrado?