OK,
Upon encoding and decoding what I noticed is that the apostrophe (') and e with
the accent are "lost" - coded text replace them, so I have to use ReplaceAll to
have them replaced, that is not a big problem.
Arnaud Nicolet <[EMAIL PROTECTED]> wrote:
> Combine it with the rotating-key XOR to cause
> the output range to include a more well distributed set so as to
> deter easy substitution hacks.
Yes, you can make your own, also.
This is what I did:
I have 3 editFields - EditField1, EditField2 and EditField3.
I have 2 Pushbuttons - Pushbuttons1 and Pushbuttons2.
So I have the method as described.
This is the code in Pushbutton1 :
Dim s, result As string
s = EditField1.text
EditField2.text = EncodeDecode(s)
That works.
Now, this is the code in Pushbutton2 :
Dim s, result As string
s = EditField2.text
EditField3.text = EncodeDecode(s)
and that gives another different set of "codings". It does not seem to be
"symmetric".
Kindly advise.
Thanks.
Lennox
---------------------------------
Ahhh...imagining that irresistible "new car" smell?
Check outnew cars at Yahoo! Autos.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>