Hola, estoy intentando encriptar con RSA en VB.NET siguiendo esas indicaciones:
http://www.elguille.info/net/dotnet/...descifrar.aspx http://www.mail-archive.com/mono-lis.../msg04351.html http://www.eggheadcafe.com/articles/20020630.asp
Ninguna de las tres me funciona pero haciendo un mezcla de ellas he conseguido encriptar y desencriptar dentro de una misma Sub.
Sin embargo al intentar crear una clase que encripte y desencripte una cadena, esta sentencia:
Código vb:
Ver originalDim DecryptedStrAsByt() As Byte = RSA3.Decrypt(Encoding.Unicode.GetBytes(cadena), False)
Me da la excepción
Datos incorrectos, siendo cadena el resultado de
Código vb:
Ver originalDim EncryptedStrAsByt() As Byte = RSA2.Encrypt(Encoding.Unicode.GetBytes(cadena), False)
Dim cadena = Encoding.Unicode.GetString(EncryptedStrAsByt)
¿Alguna idea de por donde arreglar esto?
Además, según uno de los enlaces anteriores, al desencriptar debería llamar a RSA3.FromXmlString(
publicKey), pero esto me da excepcion Calve incorrecta, si pongo RSA3.FromXmlString(
privateKey) sí funciona...
¿Sabéis algo de esto?
Gracias