Here's a link to an ActiceX control that I use to zip my files.  They have a
30 day trial version.

http://www.dart.com/powertcp/ziplite.asp

-----Original Message-----
From: Neil Carman [mailto:[EMAIL PROTECTED] 
Sent: Friday, April 08, 2005 10:40 PM
To: [email protected]
Subject: Re: [Talk] Using BWS to execute WinZip

I have several projects that work with Zip files.  Normally, I am either 
creating or unzipping a file or groups of files.  I use a nonWindows 
version of PKzip.  It takes command line parameters.  My projects end up 
as compiled VB programs.  In VB it is easy to shell out to PKzip.  I use 
another Windows based zip program and I am not familiar with WinZip.  
You might check to see if you can use command line parameters with WinZip.

example
Shell Environ("comspec") & " /c c:\dma\prg\pkunzip.exe 
c:\dma\download\tempfile.zip r* c:\dma\download"

Be careful, the standard shell command will start executing the line of 
code immediately after the shell command as soon as the shelled program 
is initialized.  If the next lines of code depend upon the output of the 
program being shelled to, then the VB program may start executing sooner 
than you want.

I actually use a version of the shell function that we wrote, which has 
an option not to continue to the next statement in the VB program until 
the "shelled" program has completed.  If you are interested, I can share 
the code with you.  Otherwise, you may have to use a Loop to check for 
the existence of the output file before continuing program execution.

Another option is to use an zipping function that is already written in 
VB.  Do an Internet search.  You will probably find code out there that 
will let you provide the functionality of WinZip directly from your VB 
code.

Mitchell Sherry - Mid West Div. wrote:

> Hi All~
>     Has anyone used BWS to execute WinZip ???  Feasible ??? Examples 
> !!!???
>  
> thanx, sherry
> HCA Midwest Division IT&S
> Applications Programmer/Analyst
> 816/823-0406
>
>  
>

-- 
Neil Carman
Director Technical Development
Manigault & Associates LLC

http://www.m-allc.com
Work: (805) 680-5601
Fax:  (714) 968-5632


DISCLAIMER: This e-mail or the documents accompanying this e-mail contain
information that may be confidential and/or privileged. It may also be
prohibited from disclosure under applicable law. The information is intended
to be for the use of the individual or entity named on this transmission. If
you are not the intended recipient, be aware that any disclosure, copying,
distribution or use of the contents of this information is without
authorization and is prohibited. If you have received this e-mail in error,
please notify us immediately so that we can take action to correct the
problem.


Reply via email to