Título: cifrar y Descencriptar cadenas (source) Publicado por: vivachapas en 1 Noviembre 2008, 19:35 pm bueno honestamente yo usaba uno q saque de internet q una sola funcion realizaba las dos tareas (descencriptar y cifrar) pero nunca lo habia entendido...
ahora no se xq se me ocurrio mirarlo, con mas conociminetos y me di cuenta q es xq usa el comando Xor (estuve investigando q es... no es nada jodido..) y pense xq no hacer uno yo xD... y bueno lo hice :P, la verdad no se si habra uno parecido (no creo q igual ¬¬) en internet xq ni me fije xD pero a este lo hice yo :P lo bueno q le veo a este code es q si cifrar x ejemplo AAAA el resutaldo no van a ser 4 caracteres iguales sino q todos distintos :P Código
bueno no se xD si les sirve o quieren opinar o conocen algun otro copado :P Título: Re: cifrar y Descencriptar cadenas (source) Publicado por: s E t H en 1 Noviembre 2008, 20:58 pm trata de cifrar esto:
chr(1) & chr(1) & chr(1) no probe, pero creo que da un resultado negativo y falla al hacer el chr() para solucionarlo podes hacer que cuando quede abajo del 0 siga desde 255 Título: Re: cifrar y Descencriptar cadenas (source) Publicado por: SKL (orignal) en 1 Noviembre 2008, 23:08 pm yo hice algo muy muy parecido, pero convertia el caracter en ascii y despues le sumaba algun valor, entonces siempre me iba a quedar numeros de 3 sifas. despues con el descifrar le restaba el numero a las 3 cifras y lo convertia en caracter. todo eso con un for que iba de 3 en 3...
Aca te dejo uno, pero este no sumba ningun valor, solo converte el caracter Código: Private Sub Command1_Click() saludos =) Título: Re: cifrar y Descencriptar cadenas (source) Publicado por: vivachapas en 2 Noviembre 2008, 00:33 am trata de cifrar esto: chr(1) & chr(1) & chr(1) no probe, pero creo que da un resultado negativo y falla al hacer el chr() para solucionarlo podes hacer que cuando quede abajo del 0 siga desde 255 mmm la onda es cifrar texto plano xD... |