Link to home
Create AccountLog in
Avatar of askolits
askolits

asked on

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

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
Avatar of Haresh Nikumbh
Haresh Nikumbh
Flag of India image

ASKER CERTIFIED SOLUTION
Avatar of Alex [***Alex140181***]
Alex [***Alex140181***]
Flag of Germany image

Link to home
membership
Create an account to see this answer
Signing up is free. No credit card required.
Create Account
Avatar of askolits
askolits

ASKER

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.
Alexl40181: Just saw a second link within  your firstexample. I think that may work for me. I'll let you know
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]
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
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
Still testing this. Will get back to you all shortly
This first link had the solution.

Thanks!