Solved

DLL needed for zipping files using VBA that works with 64 bit OS

Posted on 2013-05-24
9
1,026 Views
Last Modified: 2013-05-30
I've been using the dll file 'xzip.dll' for zipping files.(Made by XStandard). But they don't have a 64 bit version and the 32bit version doesn't work within 64 bit Office. . Anyone have a recommendation. It doesn't have to be freeware.

Or is there now a zipping function or API provided by the 64Bit OS that I can use?

I'm developing this in MSAccess 2010 using VBA. Needs to work for 64Bit office.

John
0
Comment
Question by:askolits
9 Comments
 
LVL 22

Expert Comment

by:Haresh Nikumbh
ID: 39193916
0
 
LVL 13

Accepted Solution

by:
Alexander Eßer [Alex140181] earned 500 total points
ID: 39193918
0
 

Author Comment

by:askolits
ID: 39193936
Takecoffe: I may look into it, and although I said it does't have to be freeware, $900/yr is way too much.

Alexl40181: In the first link, it looks like it will unzip files, but I also need to zip them.

The second link is the same program I mentioned in my original post. They don't have a 64 bit version. I already asked them.
0
Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

 

Author Comment

by:askolits
ID: 39193943
Alexl40181: Just saw a second link within  your firstexample. I think that may work for me. I'll let you know
0
 

Expert Comment

by:AndyHoughtonCanada
ID: 39194243
I have used the freeware 7zip version here:
http://www.7-zip.org/

They have a 64 bit version.

Here is the code I have used in the past:

    ' 7z.exe,7z.dll Need to have Zip in same location as the Access file
    ' src - must end in \*.*
    ' 7z - 7zip does not erase files on zip, need to erase separately.
    cmd = Chr$(34) & fGetSystemLocation() & "7z.exe" & Chr$(34) & " u -bd -tzip -y -r " & Chr$(34) & ZipFileDir & Chr$(34) & " " & Chr$(34) & src & Chr$(34)
    ExecCmd cmd   ' This waits for execution to finish, this only    r = Shell(cmd)

I hope this helps.
[Edited by SouthMod]
0
 
LVL 28

Expert Comment

by:omgang
ID: 39194478
Are you set on using a utilitity or can you use native OS zip functionality to accomplish the task?  I have VBA code for Access to zip files using just the OS.
OM Gang
0
 

Author Comment

by:askolits
ID: 39197278
OM Gang:  I think the second link that Alex40181 provided may work, and it uses the OS. So far it worked on both an XP and Win 7 machine running Access 2003, and 2010 32Bit.  Just need to test it for Office 64Bit and we should be all set.

I won't know for sure till next week. If not, I may have to use the suggestion from by: AndyHoughtonCanada. I'll let you  all know how it turns out.

John
0
 

Author Comment

by:askolits
ID: 39206747
Still testing this. Will get back to you all shortly
0
 

Author Closing Comment

by:askolits
ID: 39209847
This first link had the solution.

Thanks!
0

Featured Post

Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

OfficeMate Freezes on login or does not load after login credentials are input.
While working, an annoying popup showing below will come and we cannot cancel or close it form the screen. The error message will come again and again.
The Task Scheduler is a powerful tool that is built into Windows. It allows you to schedule tasks (actions) on a recurring basis, such as hourly, daily, weekly, monthly, at log on, at startup, on idle, etc. This video Micro Tutorial is a brief intro…
With the power of JIRA, there's an unlimited number of ways you can customize it, use it and benefit from it. With that in mind, there's bound to be things that I wasn't able to cover in this course. With this summary we'll look at some places to go…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question