>Can you please tell me how i can encrypt a field in the table because i store the licence number in it.
>
>And then if i want to change it to something else then i call the encrypted value to front and decrypt it and then finally again encrypt it to send to the table back.
>
>This is a small licence limit software for the application.
>
>for example if it is initially the value is 10 which is encrypted in the table.
>
>Later on if the client says they want to increase it to 12.
>
>then i should call the ten which is already encrypted in the table and change it to 12 with encryption.
>
>I am using the cipher50.fll file to encrypt.
>
>encryption part is ok but when i am calling the encrypted value from the table to decrypt it there it is not doing.
>
>table name is keytbl,
>fieldname is lickey
>
>***************I am doing thew following to encrypt which works************
>
>lcEncryptkey = thisform.text1.value
>
>SET LIBRARY to cipher50 ADDI
>
>SELECT keytbl
>REPLACE lickey WITH Encrypt(lickey, lcEncryptkey)
>
>***************************************************************************
>
>Now i want to decrypt the table field Can you please tell me.
>
>Thank you very much.

As I remember Cipher5.fll was using the same encrypt() function to encrpyt/decrypt.


lcEncryptkey = thisform.text1.value

SET LIBRARY to cipher50 ADDI

SELECT keytbl
REPLACE lickey WITH Encrypt(lickey, lcEncryptkey)

lcDecrypted = Encrypt(trim(keytbl.lickey), lcEncryptkey)

Cetin