Página 1 de 1

Como Criptografar um registro numérico

Enviado: 02 Set 2011 19:57
por Gilberto M Silva
como criptografar um registro numerico em um DBF, por exemplo:
var1:=valor
get var1 pict "@e 9,999.99"
read
*criptografa var1
replace valor with (var1 criptografado)

Como Criptografar um registro numérico

Enviado: 02 Set 2011 20:16
por alxsts
Olá!

Creio que uma boa prática seria converter todos os campos para string antes de criptografar.

Como Criptografar um registro numérico

Enviado: 02 Set 2011 20:48
por Gilberto M Silva
Olha, tentei fazer isso mais não está gravando nada no registro, fica vazio, estou fazendo assim:
var1:= valor(nome do registro na tabela DBF)
get var1 pict "@r 9,999.99"
read
var2:= crypt(strzero(var1))
replace valor witn val(var2)

mais não grava nada, ja tentei gravar num campo string tambem não gravou

Como Criptografar um registro numérico

Enviado: 03 Set 2011 13:09
por alxsts
Olá Gilberto.

Os dados encriptados tem que estar gravados no DBF como string. Se você tentar transformar uma string que contenha caracteres através da função Val(), não vai retornar nada mesmo.

O teu programa terá que ter a inteligência de pegar um registro gravado no DBF, com os campos encriptados no formato string e saber decodificar cada um para o tipo de dados adequado.