Data Encryption (was no subject)

Author: Jack Skelley

Posted: 2000-07-14 at 13:04:28

--------------B547AF6585ED90440B3A1B04

Content-Type: text/plain; charset=us-ascii

Content-Transfer-Encoding: 7bit

Florin:

For something really simple but very effective try this:

function encypt

parameter lcP_line

lcEn_line = ""

for i = 1 to len(alltrim(lcP_line))

lcEn_line = lcEn_line + chr(asc(substr(lcP_line,i,1)) + 48)

endfor

return lcEn_line

function decrypt

parameter lcP_line

lcEn_line = ""

for i = 1 to len(alltrim(lcP_line))

lcEn_line = lcEn_line + chr(asc(substr(lcP_line,i,1)) - 48)

endfor

return lcEn_line

If you try this and browse the table you will see many characters that

all look the same but have different ASCII values.

HTH

Jack Skelley

skelley@newjerseydevils.com

Florin Marta wrote:

> I'm looking for a way to encode the caracter fields in a table.

> Something light, doesn't have to be rock solid, but enough to don't

> understand anything with a browse. Does anybody has write code to do

> something like this?(English is not my 1st language :) Florin Marta"No

> amount of advance planning will ever replace dumb luck."

> --Anonymous

--------------B547AF6585ED90440B3A1B04

Content-Type: text/html; charset=us-ascii

Content-Transfer-Encoding: 7bit

<HTML>

<BODY BGCOLOR="#FFFFFF">

Florin:

<BR>For something really simple but very effective try this:

<BR>function encypt

<BR>  parameter lcP_line

<BR>  lcEn_line = ""

<BR>  for i = 1 to len(alltrim(lcP_line))

<BR>    lcEn_line = lcEn_line + chr(asc(substr(lcP_line,i,1))

+ 48)

<BR>  endfor

<BR>return lcEn_line

<P>function decrypt

<BR>  parameter lcP_line

<BR>  lcEn_line = ""

<BR>  for i = 1 to len(alltrim(lcP_line))

<BR>    lcEn_line = lcEn_line + chr(asc(substr(lcP_line,i,1))

- 48)

<BR>  endfor

<BR>return lcEn_line

<P>If you try this and browse the table you will see many characters that

all look the same but have different ASCII values.

<BR>HTH

<P>Jack Skelley

<BR>skelley@newjerseydevils.com

<BR> 

<P>Florin Marta wrote:

<BLOCKQUOTE TYPE=CITE> <STYLE></STYLE>

<FONT SIZE=-1>I'm looking for

a way to encode the caracter fields in a table. Something light, doesn't

have to be rock solid, but enough to don't understand anything with a browse.

Does anybody has write code to do something like this?</FONT><FONT SIZE=-1>(English

is not my 1st language :)</FONT> <FONT SIZE=-1>Florin Marta</FONT><FONT SIZE=-1>"No

amount of advance planning will ever replace dumb luck."</FONT>

<BR><FONT SIZE=-1>--Anonymous</FONT></BLOCKQUOTE>

 

</BODY>

</HTML>

--------------B547AF6585ED90440B3A1B04--

©2000 Jack Skelley