Algoritmo De Encriptacion

[josepa]

:-p HOLA ALGUIEN TIENE ALGUN ALGORITMO DE ENCRIPTACION HECHO EN CUALQUIER LENGUAJE DE PROGRAMACION (DE PREFERENCIA C++/VBASIC6.0/VBASIC.NET/JAVA) ES URGENTE O POR LO MENOS LA LOGICA DE ENCRIPTACION ESPERO AYUDA URGENTE¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡
SI TIENEN UNOPARECIDO AL kerberos seria excelente U OTRO D 128 BIT's

[scorpion25acv]

Yo utilice uno en visual fox pro 7, talves te sirva

PROCEDURE encriptar
PARAMETERS clave

largo = len(alltrim(clave))
frase = alltrim(clave)


nueva_frase = ""

i = 0
for i = 1 to largo
nueva_frase = nueva_frase + chr(asc(substr(frase,i,1)) * 2)
endfor

Return nueva_frase
ENDPROC

[RadicalEd]

UTILIZA EL COMANDO Xor, SIRVE COMO ENCRIPTADOR EN CUALQUIER LENGUAJE DE PROGRAMACION