FoxPro/Visual FoxPro - fragmento de programa que encripte y desencripte una frase

   
Vista:

fragmento de programa que encripte y desencripte una frase

Publicado por Jonathan jona_t21@hotmail.com (1 intervención) el 20/09/2011 01:30:25
Hola Muy buenas. el motivo de esta visita es que necesito ayuda con un programa que encripte y desencripte una frase e intentado por mi solo pero nada. ya busque por todos lados y nada

necesito lo mas sencillo que se pueda yo intente esto :

frase=SPACE(10)
@5,4 get frase
READ
clear
FOR k= 1 TO LEN(frase)
m=SUBSTR(frase,k,1)
a=ASC(m)
IF LEN(ASC(m))
then "0"+m
endif
ENDFOR

@11,11 say a

me tira un error
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

fragmento de programa que encripte y desencripte una frase

Publicado por victor perez (278 intervenciones) el 20/09/2011 16:51:11
hola,

No se que es lo que quieres hacer con esta rutina.

Yo lo corri y el error que encuentro es en

IF LEN(ASC(m))
then "0"+m

No pusiste ninguna condicion.

Saludos,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

fragmento de programa que encripte y desencripte una frase

Publicado por hancito2003 (54 intervenciones) el 20/09/2011 19:58:17
Hola.

Hay varios ejemplos en esta web de encriptacion/desencriptacion. Solo tienes que buscar en la opcion de busqueda del foro la palabra "ENCRIPTAR" o "ALGORITMO" y te apareceran muchos ejemplos. Aqui tienes un link con uno de ellos:

http://www.lawebdelprogramador.com/foros/FoxPro_Visual_FoxPro/912055-PLINIO,_NEO,_ERNESTO_COMO_DESENCRITO_ESTE_CODIGO.html

Otro ejemplo es este:

http://www.lawebdelprogramador.com/foros/FoxPro_Visual_FoxPro/911612-%C2%BFCOMO_DESENCRIPTAR_ESTE_CODIGO__EXPERTOS_DE_AQUI.html

Saludos.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar