Zipping and Unzipping Modules.

[Scott Burke]

Does anyone know of a basic code for zipping and unzipping files. what I
really wont is the code itself to be all "Access Module". I am trying to
avoid DLL's or other linked files.

The Goal.
To have my programs total self suffient. That is, NO 3rd party software.

Thanks
Scott Burke

 

[freakazeud]

Hi,
depends...if you buy winzip (full version) you can automate that and I think
you can automate winXP's build in zipping utility.
Have a look at this thread and my response with links to sample VBA
http://www.utteraccess.com/forums/s...=m&olderval=&oldertype=#Post1043435&bodyprev=
HTH
Good luck

 

[Scott Burke]

Hi Freakazeud. We currently use PKUNZIP! That is the problem. Keep this in
mind. There should be a law against some people working with computers. We
have most of those people work here!!!! An example is person X uninstalled
Winzip from her system because she did not like the program! It does not
matter if the inhouse software needs it or not. So my solution is to find
an UNzip Access code module. If I can keep the zip functions inside of the
program then I can avoid this problem. Now and in the future.

 

[Douglas J Steele]

As Eduardo A. Morcillo says at
http://www.mvps.org/emorcillo/en/code/shell/xpzip.shtml, "There's no API in
Windows to work with .zip files but the compressed folder file extension can
be used from VB to compress and decompress files in .zip files". While I
haven't look that closely at the code, you should be able to take the class
Eduardo has at http://www.mvps.org/emorcillo/en/code/vb6/index.shtml
(specifically,
http://www.mvps.org/emorcillo/download/vb6/xpzip.zip) and use it in Access.

Other than that, if you decide you're willing to accept DLLs, take a look at
the following:
http://amazecreations.com/datafast/daaug.aspx
http://www.info-zip.org/
http://users.skynet.be/saw/sawzip.htm

 

[freakazeud]

If your users have XP installed then you don't need a seperate program as it
has a feature build in and you can use it through VBA as well.
So if not then you might be limited to third party solutions.
Douglas had posted a couple more suggestions.
HTH
Good luck

 

[Scott Burke]

Hi guys. Thanks for the input. I found the Built-in for XP interesting.
Before I ask the next question please keep in mind my experience. I did a
lot of programming in DBaseIII/Clipper then I moved into Access with a fair
amount of VBA. With that said….What do I do with this? it came from the
XPZIP.ZIP example.

VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
End
Attribute VB_Name = "CompressedFolder"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False

My guess is that this is pure VB6 code. I don’t know how to translate it
into VBA that We use in Access 2000-2003 databases

Help please

 

[Douglas J. Steele]

Eduardo's provided a Class module, not a normal module. Those things are
buried in Class modules, but appear when you look at the text file that
contains them (in VB) or export them to text (in Access).

Just ignore that part of the code. Create a new Class module and paste
everything else into it.

 

[Scott Burke]

Interesting...... I am going to spend a few days on this. To see if I can't
figure it out.

thank for the imput.
Scott Burke

 

[Henry]

I am using the GNU code, that works fine with me.........