Encriptacion

Me alegra escribir esta entrada por dos motivos: Hace tiempo que no escribía en este pobre y olvidado blog,y porque el tema de encriptacion no es tan difícil que digamos(para ser sincera,solo es fácil la teoría).De todas formas,gracias profe Iván, que forzosamente he vuelto a escribir aquí.(No se tome a mal lo de forzosamente)
Empecemos:

Encriptar significa proteger una información de terceros,un dato importante que solo tú deseas saber. Al momento que un ordenador encripta,por ejm. una contraseña; es casi imposible poder descifrarla,y esto solo se logra sólo con un software de descodificación que conoce el autor.
Encriptar una información,cada vez es más necesario,debido a los robos de las claves de tarjetas de crédito,cuentas corrientes;pero más que nada, la información que viaje a través de la red. Es por esta última razón que las versiones recientes de navegadores de Internet,usan sistemas automáticos de encriptación, mas que nada para que los hackers no pueden robar esta información.

Algunos prefieren usar la palabra cifrados en vez de encriptacón,ya que esta es una mala traducción de la palabra encrypt. Un texto plano que está encriptado o cifrado se denomina criptograma.

He aquí un ejemplo de encriptación,para mí el más simple.

Modelo EncryptionString

EncryptionString, es un clásico sistema el cual toma el mensaje y una clave del usuario, y a través de una combinación de estos dos parámetros se produce una cadena codificada.

Texto a codificar: ENCRYPTION
Caracteres del Texto: E N C R Y P T I O N
Códigos ASCII: 69 78 67 82 89 80 84 73 79 78
Contraseña KEY: K E Y K E Y K E Y K
Caracteres de KEY: 75 69 89 75 69 89 75 69 89 75
Suma de Códigos ASCII: 144 147 156 157 158 169 159 142 168 153
En caracteres:  “ œ  ? © Ÿ ? ¨ ™

Texto codificado: “œ?©Ÿ?¨™

El modo para usar la función EncryptionString es el siguiente:

'//Codifica
TextoCodificado = EncryptString(TextoOriginal, Contraseña, ENCRYPT)

'//Decodifica
TextoOriginal = EncryptString(TextoCodificado, Contraseña, DECRYPT)