zipping and unzipping files

[collierd]

Hello

Is there a way, using vbscript, to automate the zipping and unzipping of files

Thanks

Damian.

 

[mrmovie]

other than calling winzips command line methods etc using a Shell.Run i would say no, vbscript doesnt have any built in zipping.
you might be able to use WMI and 'compression' but i wouldnt think that is what you are really after

 

[dilettante]

I agree with mrmovie, I don't know of anything for this in WSH, IE, ASP, or Office programs. I'm not sure what script host you're talking about though. There sure isn't anything in the VBScript engine itself.

It comes down to two options:
[ul][li]Find/buy an ActiveX component[/li]
[li]Run an external utility via .Run, .Execute, .InvokeVerb, or some other method of WScript.Shell or Shell.Application[/li][/ul]
I'm not sure how "quietly" WinZip will run. You might consider alternatives like InfoZip's zip.exe and unzip.exe or FreeByte Zip, which are both free (unlike WinZip which is shareware).

 

[brianashman]

WinZip & WinRAR have command line access.

http://winzip.com/prodpagecl.htm

http://www.rarlab.com/rar_archiver.htm

(see the 3rd feature)

 

[collierd]

Thanks

Should be able to work it out from there

 

[brianashman]

Here is a FREEWARE ActiveX interface:

http://www.molestudio.com/tools/molezip/

 

[ShadowFox333]

I have to deal with a lot of legacy systems and this also works. Enjoy Bob

returncode=msgbox ("mount a 3.5 diskette for backup",65,"backup start")
if returncode=1 thenSet ss = CreateObject("WScript.Shell")
ss.run "COMMAND /C C:\util\pkzip.exe a:master77.zip y:\rds\rds77\master.txt ",1,TRUE
set ss = nothing msgbox "backup is done please remove the diskette",64,"backup finished"
end if