FoxPro/Visual FoxPro - alguien q conosca VBasic

alguien q conosca VBasic

Publicado por Ruben (19 intervenciones) el 17/05/2004 21:42:32

necesito traducir a FOX esta pequeña función
For i = 1 To Len(Mensaje)
LRCrx = LRCrx Xor Asc(Mid(Mensaje, i, 1))
Next

lo que n o entiendo es Xor y Mid.. desde ya gracias

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

RE:alguien q conosca VBasic

Publicado por saul (362 intervenciones) el 17/05/2004 21:58:27

Hola amigo..
el XOR es como el OR y el MID es para pasar de caracter en caracter..
si lo que quieres es incriptar algo (como tu clave)
escribeme tengo ejemplos..
bye..

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar

RE:alguien q conosca VBasic

Publicado por Ruben (19 intervenciones) el 17/05/2004 22:12:29

y como seria este ejemplo?, traducido a FoxPro digo.:
For i = 1 To Len(Mensaje)
LRCrx = LRCrx Xor Asc(Mid(Mensaje, i, 1))
Next
please, su equivalente el VFoxPro

Valora esta respuesta

Comentar

RE:traduccion

Publicado por lanor (52 intervenciones) el 18/05/2004 20:56:24

for i = 1 to len(mensaje)
lrcrx= bitxor(lrcrx,asc(subs(mensaje,i,1)))
endfor

Valora esta respuesta

Comentar

RE:traduccion

Publicado por Ruben (19 intervenciones) el 18/05/2004 21:28:59

Muchas gracias. muy amable. y sorry por los comentarios anteriores.

Valora esta respuesta

Comentar

Ayuda Roman o Saul en combo

calcular LRC