Author: KAM.covad
Posted: 2009-05-15 at 20:20:52
Here is my test after installing the correct dlls and getting no errors: =
What am I doing wrong with the 7.1 and 8.0 versions?
Clear
* vfpencryption.fll original version 6kb
lcEncryptionLibrary =3D Locfile("vfpencryptionSSI.FLL","FLL")
If !Empty(lcEncryptionLibrary)
SET LIBRARY TO
Set Library To (lcEncryptionLibrary)
Else
Messagebox("Cannot find the file: vfpencryptionSSI.fll")
Quit
Endif
lcTestEncrypt =3D alltrim(Encrypt("Hello World!", "My_SeCrEt_KeY"))
? lcTestEncrypt
lcTestDecrypt =3D decrypt(lcTestEncrypt,"My_SeCrEt_KeY")
? lcTestDecrypt && Hello World!
* vfpencryption.fll version 7.1 144kb
lcEncryptionLibrary =3D Locfile("vfpencryption71.FLL","FLL")
If !Empty(lcEncryptionLibrary)
SET LIBRARY TO
Set Library To (lcEncryptionLibrary)
Else
Messagebox("Cannot find the file: vfpencryption71.fll")
Quit
Endif
lcTestEncrypt =3D alltrim(Encrypt("Hello World!", "My_SeCrEt_KeY"))
? lcTestEncrypt
lcTestDecrypt =3D decrypt(lcTestEncrypt,"My_SeCrEt_KeY")
? lcTestDecrypt && =
^=D3-=C9=E8=F2n=FE?=1Ff=1A=ED=DE=7F1fK=1Az=A3=11?=F4e=8F=DD=11=DC=EC=B5-
* vfpencryption.fll version 8.0 120kb
lcEncryptionLibrary =3D Locfile("vfpencryption80.FLL","FLL")
If !Empty(lcEncryptionLibrary)
SET LIBRARY TO
Set Library To (lcEncryptionLibrary)
Else
Messagebox("Cannot find the file: vfpencryption80.fll")
Quit
Endif
lcTestEncrypt =3D alltrim(Encrypt("Hello World!", "My_SeCrEt_KeY"))
? lcTestEncrypt
lcTestDecrypt =3D decrypt(lcTestEncrypt,"My_SeCrEt_KeY")
? lcTestDecrypt && =C8=11
&& =D1s2=BE=C61=16=D5df=15=05>FGJ=D8=DD =
s=B8=18=12?=8Fj>=B4=1A
=20
----- Original Message -----=20
From: Allen=20
To: profox@leafe.com=20
Sent: Friday, May 15, 2009 12:22 PM
Subject: RE: VFP9 SP1 - problems with the vfpencryption.fll version 71?
71 is a sideways not an upgrade. I use 71 because v8.0 runtimes are a =
right
royal pain. What error are you getting. You will need the 71 runtimes. =
VFP
uses one but there is another. Cant think of the name but there is a =
write
up on sweatpotato.
Allen=20
-----Original Message-----
From: profoxtech-bounces@leafe.com [mailto:profoxtech-bounces@leafe.com] =
On
Behalf Of KAM.covad
Sent: Friday, May 15, 2009 8:35 PM
To: profoxtech@leafe.com
Subject: VFP9 SP1 - problems with the vfpencryption.fll version 71?
I was using vfpencryption.fll, encrypt and decrypt with no problem. I
upgraded to vfpencryption 71 and now I get an API error on XP SP2 with =
the
DECRYPT function
Anyone else using vfpencryption.fll
[excessive quoting removed by server]