Encryption method desired...

[MLH]

Here's what I would like to do from with VBA procedure
running in Access 97...

Read a plaintext file on disk (IE, autoexec.bat), encrypt
it and write it to disk (say, c:\encryptd.txt ). Recommendations
on the SIMPLEST tools possible to accomplish this. Will
be distributing in A97 runtime environment and do NOT
wish to encounter problems on remote target machines
having REFERENCE issues, etc.

Many thx N advance.

[David W. Fenton]

MLH <CR**@NorthStat e.net> wrote in
news:72******** *************** *********@4ax.c om:

Gotcha. . . .
Tom is simply wrong.

See http://aspnet.4guysfromrolla.com/articles/103002-1.aspx under
the topic heading "MD5 Encryption - A Brief Summary" for an
explanation of how MD5 encruption is used.
. . . Thx very much. I like polite person's idea.
Dunno if you looked at it. My security objective is
about as important as locking up shed if you keep
some costly tools in it. That is, I'll spring for a pad-
lock - but I'm not going to buy a used, walk-in bank
vault.
MD5 encyrption is *exactly* what you need.
Really, I could write a routine to shuffle and cut the
string a few times - like a deck of cards. Honestly,
if I found example code posted that doessomething
like that - I'd probably just go with it.

MD5 encryption is exactly what you need.

--
David W. Fenton http://www.bway.net/~dfenton
dfenton at bway dot net http://www.bway.net/~dfassoc

[polite person]

You can, (I think you need to buy an extra bit from WINZIP)
but then it isn't any easier than using other encryption s/w,
sorry I misread your original request

On Fri, 28 Oct 2005 09:22:35 -0400, MLH <CR**@NorthStat e.net> wrote:

Now there's an idea. Its certainly cheap enough.
Can I launch a password-based WinZip process
from VBA that will run hidden, read some text file
(MyClearTextFi le.txt) and write another file...
c:\WhatEverFil eNameIwant.Desi redExtension
?

Any sample code you'd care to share or porint
out?
xxxxxxxxxxxxxx xxxxxxxxxxxxxxx xxxxxxxxxxx

1. Nothing is perfect.
2. simplest is use Winzip.
3. Use a different password for every file.
4. Use a long gibberish password.

[Tom van Stiphout]

On Fri, 28 Oct 2005 15:56:38 -0500, "David W. Fenton"
<dX********@bwa y.net.invalid> wrote:

The message digest is a 128-bit number. It simply cannot hold all the
information a large plaintext does. It therefore does not encrypt the
plaintext (in the sense that it can be decrypted).

-Tom.

MLH <CR**@NorthStat e.net> wrote in
news:72******* *************** **********@4ax. com:

Gotcha. . . .

Tom is simply wrong.

See http://aspnet.4guysfromrolla.com/articles/103002-1.aspx under
the topic heading "MD5 Encryption - A Brief Summary" for an
explanation of how MD5 encruption is used.

. . . Thx very much. I like polite person's idea.
Dunno if you looked at it. My security objective is
about as important as locking up shed if you keep
some costly tools in it. That is, I'll spring for a pad-
lock - but I'm not going to buy a used, walk-in bank
vault.

MD5 encyrption is *exactly* what you need.

Really, I could write a routine to shuffle and cut the
string a few times - like a deck of cards. Honestly,
if I found example code posted that doessomething
like that - I'd probably just go with it.

MD5 encryption is exactly what you need.

[David W. Fenton]

Tom van Stiphout <no************ *@cox.net> wrote in
news:kb******** *************** *********@4ax.c om:

The message digest is a 128-bit number. It simply cannot hold all
the information a large plaintext does. It therefore does not
encrypt the plaintext (in the sense that it can be decrypted).

I don't know where you're getting this bit about message digests.

However, I re-read what MLH wanted, and he needs 2-way encryption,
so it wouldn't work, as MD5 is only 1-way.

--
David W. Fenton http://www.bway.net/~dfenton
dfenton at bway dot net http://www.bway.net/~dfassoc

[Smartin]

MLH wrote:

Gotcha. Thx very much. I like polite person's idea.
Dunno if you looked at it. My security objective is
about as important as locking up shed if you keep
some costly tools in it. That is, I'll spring for a pad-
lock - but I'm not going to buy a used, walk-in bank
vault.

Really, I could write a routine to shuffle and cut the
string a few times - like a deck of cards. Honestly,
if I found example code posted that doessomething
like that - I'd probably just go with it.

A routine to do a "Caesar cipher" is simple to write. This is definitely
not high-end security, but it will keep casual eyes from seeing anything
of value.

This is totally untested and sleazy code, but maybe it will give you
some ideas:

==== Code Begin
Function Encrypt(SomeTex t As String) As String
' Loop through the input, shifting each character's ASCII value
Dim i As Long
Dim tmp As String
For i = 1 To Len(SomeText)
tmp = tmp + Shift(Mid(SomeT ext, i, 1))
Next i
Encrypt = tmp
End Function

Function Shift(SomeChar As String) As String
' Shift the input character's ASCII value by 17
' but only if its ASCII value is in [32..126]
Dim n As Integer
n = Asc(SomeChar)
If n >= 32 And n <= 126 Then
n = n + 17
If n > 126 Then n = n - 126 + 32
Shift = Chr(n)
Else
Shift = SomeChar
End If
End Function
==== Code End

? encrypt ("Smartin")
d~r%'z!

The procedure to reverse the "encryption " would be pretty simple to do.
--
Smartin