Don't forget the end parameter for the type of encryption, for example 1024
Allen 

-----Original Message-----
From: [email protected] [mailto:[email protected]] On
Behalf Of KAM.covad
Sent: Saturday, May 16, 2009 2:21 AM
To: [email protected]
Subject: Re: VFP9 SP1 - problems with the vfpencryption.fll version 71?

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 = 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 = alltrim(Encrypt("Hello World!", "My_SeCrEt_KeY"))
? lcTestEncrypt
lcTestDecrypt = decrypt(lcTestEncrypt,"My_SeCrEt_KeY")
? lcTestDecrypt   && Hello World!



_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to