Information générale
Catégorie:
Contrôles ActiveX en VFP
Titre:
Vfpencryption.fll Error
Good Morning,
I need help with the following 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
Thanks in advance
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement