Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Vfpencryption.fll Error
Message
From
19/11/2019 02:49:56
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
Vfpencryption.fll Error
Miscellaneous
Thread ID:
01671923
Message ID:
01671923
Views:
67
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
Map
View

Click here to load this message in the networking platform