General information
Category:
ActiveX controls in VFP
Title:
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
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only