Inicio > Visual Fox Pro > davsoft > Encriptar claves en Base Datos

Encriptar claves en Base Datos

Experto:
Usuario:
Fecha: 26/07/2008
Valoración: (4,00 sobre 5) Categoría: Visual Fox Pro
19/07/2008
jechu, usuario preguntando en Visual Fox Pro
Usuario
Estimado amigo una vez mas molestando dime no se si tendras algun programa q me permita q se Guarda en una base de datos las claves de acceso al sistema pero encriptadas (ya sea q cuando el usuario digite letras y numeros se encripte) te voy a agradecer de ante mano gracias
 
21/07/2008
jechu, experto respondiendo en Visual Fox Pro
Experto
Hola amigo, si, hay muchas opciones para eso, dime que base de datos usas y te dare los ejemplos, pero si usas algun motor de bases de datos puedes usar la opcion que trae esta, por ej. en mysql puedes usar encriptaciones de en MD5  que son claves muy seguras, esto se hace con SHA1(), pero si trabajas con DBF de foxpro puedes usar codigos de diferentes clases:
en www.davphantom.net  hay un muy buen codigo hecho en vfp para encriptar con MD5, es bastante seguro, pero si quieres usar algun codigo mas simple pero menos seguro podrias usar algo com esto:
function encriptar(xCadena)
xAcum = ' '
for c=1 to len(alltr(xCadena))
            xAcum = alltr(xAcum)+chr(asc(substr(xCadena,c,1))+36)
endfor
return(xAcum)
Como ves reemplazamos el caracter sumandole el codigo asccii 36, entonces una letra  A  se convierte en e  (e minusculas), este es el principio, muy inseguro por cierto pero es el principio de todo, para desencriptar solo le restas el numero que le habias sumado, los codigos mas seguro no le suman un valor constante como yo lo hice (36 x ej.), sino que le suman varios numeros diferentes, inclusive rotan el texto primero y luego le suman los valores, todo depende de la inmaginación de cada uno, esta funcion recibe como paremtro un valor y retorna el codigo encriptado, su uso seria asi:
=encriptar('david')
el retornaria algo como esto:  ^...s^
Espero haberte dado la idea de como encriptar los datos, pero recuerda, si quieres usar algo realmente seguro no olivides bajar el de MD5, sin o puede bajarlo enviame tu direccion para enviartelo directamente, pero pasar por la web de davphanton.net es bastante bueno.
Un saludo
26/07/2008
jechu, usuario preguntando en Visual Fox Pro
Usuario
Si pudieras enviarme a mi correo algun ejemplo en VPF mas q tiviera te envio por siacaso: jchavez04@hotmail.com
Enlaces patrocinados