vfpencryption.fll - Error

[Carlos Lima]

Buen día,

Necesito ayuda con el siguiente error:

o_dado = 'abcdefghi'

wait WINDOW encryptar(o_dado)

FUNCTION encryptar

PARAMETERS _data

PRIVATE lcKey, lcPlaintext, lcCipherText, lcDecipherText

SET LIBRARY TO (LOCFILE('vfpencryption.fll','FLL')) ADDITIVE

m.lnCipherMode = 0

m.lcKey = "FOXIDORG"

m.lcData = _data

m.lcCipher = ENCRYPT(m.lcData, m.lcKey, m.lnCipherMode)

SET LIBRARY TO

RETURN m.lcCipher

ENDFUNC 

FUNCTION decryptar

PARAMETERS _cipher

PRIVATE lcKey, lcPlaintext, lcCipherText, lcDecipherText, Dekripnya, xData

SET LIBRARY TO (LOCFILE('vfpencryption.fll','FLL')) ADDITIVE

m.lnCipherMode = 0

m.lcKey = "FOXIDORG"

m.lcCipher = STRCONV(_cipher,16)

m.Dekripnya = DECRYPT(m.lcCipher, m.lcKey, 8, m.lnCipherMode)

SET LIBRARY TO

RETURN m.Dekripnya

ENDFUNC 

gracias de antemano

[Jose Antonio Blasco]

Carlos, acabo de revisar la documentación de "VfpEncryption" y con el tipo de encriptación que especificas:

m.lnCipherMode = 0 

hace falta que la clave de encriptación "m.lckey" tenga 16 caracteres.

Te adjunto la documentación por si no la tienes.

Un saludo.

 

Jose A. Blasco
Zaragoza - España
Visual FoxPro 9 SP2

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/e4cbdf7b-1414-451c-921b-be0704722a2c%40googlegroups.com.

[Carlos Lima]

Buen día Jose

Muitas gracias,

Pero continua marcando error com m.lckey com 16 caracteres:

FUNCTION encryptar

PARAMETERS _data

PRIVATE lcKey, lcPlaintext, lcCipherText, lcDecipherText

SET LIBRARY TO (LOCFILE('vfpencryption.fll','FLL')) ADDITIVE

m.lnCipherMode = 0

m.lcKey = "FOXIDORGBASDFGHJ"

m.lcData = _data

m.lcCipher = ENCRYPT(m.lcData, m.lcKey, m.lnCipherMode)

SET LIBRARY TO

RETURN m.lcCipher

ENDFUNC 

Por favor envíeme un ejemplo funcional.

Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publice...@googlegroups.com.

[Jose Antonio Blasco]

Te adjunto el enlace a la página de VFPEncryption.  En ella encuentras las descargas de las 2 versiones disponibles y detalle de las librerías necesarias para cada una.

En cada descarga hay ejemplos de muchas posibilidades.

https://www.sweetpotatosoftware.com/blog/index.php/2009/08/09/major-vfp-encryption-update/ 

 

Un saludo.

Jose A. Blasco
Zaragoza - España
Visual FoxPro 9 SP2

Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/a18cd6a9-9de1-4557-96a5-968fdce01e6a%40googlegroups.com.

[ZeRoberto]

Acá te dejo la version 7.1 con todo los runtimes que necesita para la distribucion

https://www.mediafire.com/file/yovlql0px5p9etl/VfpEncryption71.rar/file  

Saludos

Ze

VFP Unlimited - Canal de Youtube

https://www.youtube.com/channel/UCkUIcHDsOdMUIdhYNO985JQ

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/CAFg9aWwUjzM9oJcjdPDQBNm2C5_t_Ee7sOg9v6y7Rrj3bpoHvg%40mail.gmail.com.