Gfrktyl

It is possible to zip files without installation of any additional
software (I have tested it). The solution is:

Run this in a command-line window to create a zip file
named C:someArchive.zip containing all files in folder C:test3:

CScript  zip.vbs  C:test3  C:someArchive.zip

Where file zip.vbs contains:

'Get command-line arguments.

Set objArgs = WScript.Arguments

Set FS = CreateObject("Scripting.FileSystemObject")

InputFolder = FS.GetAbsolutePathName(objArgs(0))

ZipFile = FS.GetAbsolutePathName(objArgs(1))



'Create empty ZIP file.

CreateObject("Scripting.FileSystemObject").CreateTextFile(ZipFile, True).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar)



Set objShell = CreateObject("Shell.Application")



Set source = objShell.NameSpace(InputFolder).Items



objShell.NameSpace(ZipFile).CopyHere(source)



'Required to let the zip command execute

'If this script randomly fails or the zip file is not complete, 

'just increase to more than 2 seconds

wScript.Sleep 2000

I haven't tested it for paths and file names containing spaces. It may work if quotes
are put around the command line parameters.

How it works: the built-in zip functionality in Windows (Windows XP and later?) is
exposed through COM interfaces from the Windows shell
, explorer.exe - that is the "Shell.Application" part. This COM interface can be used from a VBScript script because
such a script can access COM components. To make the script fully self-contained it creates
an empty ZIP file to get started (one could also create an empty ZIP file and copy it to the target system along with the VBScript script).

VBScript has been installed by default in every desktop
release of Microsoft Windows since Windows 98.

CScript.exe is part of Windows Script Host.
Windows Script Host is distributed and installed by default on Windows 98 and later versions of Windows. It is also installed if Internet Explorer 5 (or a later version) is installed.

If you are open to using PowerShell, zip capabilities are available in .NET 2.0 (PowerShell is .NET). Here's an a example (source) credit to Mike Hodnick:

########################################################

# out-zip.ps1

#

# Usage:

#    To zip up some files:

#       ls c:source*.txt | out-zip c:targetarchive.zip $_

#

#    To zip up a folder:

#       gi c:source | out-zip c:targetarchive.zip $_

########################################################



$path = $args[0]

$files = $input



if (-not $path.EndsWith('.zip')) {$path += '.zip'} 



if (-not (test-path $path)) { 

  set-content $path ("PK" + [char]5 + [char]6 + ("$([char]0)" * 18)) 

} 



$ZipFile = (new-object -com shell.application).NameSpace($path) 

$files | foreach {$zipfile.CopyHere($_.fullname)}

You can eliminate the risk of timing out during compression by polling for existence of the compression dialog window. This method also handles the user cancelling out of the compression window.

objShell.NameSpace(ZipFile).CopyHere(source)



' Wait for compression window to open

set scriptShell = CreateObject("Wscript.Shell")

Do While scriptShell.AppActivate("Compressing...") = FALSE   

   WScript.Sleep 500 ' Arbitrary polling delay

Loop  



' Wait for compression to complete before exiting script

Do While scriptShell.AppActivate("Compressing...") = TRUE   

   WScript.Sleep 500 ' Arbitrary polling delay

Loop

If you are able to install the Resource Kit Tools, you will find a command line tool called COMPRESS that can create compressed archive files like zip.

Microsoft (R) File Compression Utility  Version 5.00.2134.1

Copyright (C) Microsoft Corp. 1990-1999.  All rights reserved.



Compresses one or more files.



COMPRESS [-r] [-d] [-z] Source Destination

COMPRESS -r [-d] [-z] Source [Destination]



  -r            Rename compressed files.

  -d            Update compressed files only if out of date.

  -zx           LZX compression.

  -z            MS-ZIP compression.

  -zq[n]        Quantum compression and optional level

                (in range 1-7, default is 4).

  Source        Source file specification.  Wildcards may be used.

  Destination   Destination file | path specification.

                Destination may be a directory.

                If Source is multiple files and -r is not specified,

                Destination must be a directory.

'Keep script waiting until compression is done

Do Until objShell.NameSpace( ZipFile ).Items.Count = objShell.NameSpace( InputFolder ).Items.Count

    WScript.Sleep 200

Loop

Multiple files / directories with simplified code.

cscript zip.vbs target.zip sourceFile1 sourceDir2 ... sourceObjN

zip.vbs file

Set objArgs = WScript.Arguments

ZipFile = objArgs(0)



' Create empty ZIP file and open for adding

CreateObject("Scripting.FileSystemObject").CreateTextFile(ZipFile, True).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar)

Set zip = CreateObject("Shell.Application").NameSpace(ZipFile)



' Add all files/directories to the .zip file

For i = 1 To objArgs.count-1

  zip.CopyHere(objArgs(i))

  WScript.Sleep 10000 'REQUIRED!! (Depending on file/dir size)

Next

This is a mutation of the accepted answer. I do a ton of automation tasks on up to thousands of files at a time, so I can't just sleep for 2 seconds and not care about it. I gleaned the workaround here, which is also similar to Jiří Kočara's answer here.

This will cause the destination folder to be pinged every 200ms, which is approximately as fast as Microsoft says to check for FS updates.

Set parameters = WScript.Arguments

Set FS = CreateObject("Scripting.FileSystemObject")

SourceDir = FS.GetAbsolutePathName(parameters(0))

ZipFile = FS.GetAbsolutePathName(parameters(1))

CreateObject("Scripting.FileSystemObject").CreateTextFile(ZipFile, True).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar)

Set shell = CreateObject("Shell.Application")

Set source_objects = shell.NameSpace(SourceDir).Items

Set ZipDest = shell.NameSpace(ZipFile)

Count=ZipDest.Items().Count

shell.NameSpace(ZipFile).CopyHere(source_objects)

Do While Count = ZipDest.Items().Count

    wScript.Sleep 200

Loop

Here'a my attempt to summarize built-in capabilities windows for compression and uncompression - https://stackoverflow.com/questions/28043589/how-can-i-compres-zip-and-uncopress-unzip-files-and-folders-with-batch-f

with a few given solutions that should work on almost every windows machine.

As regards to the shell.application and WSH I preferred the jscript
as it allows a hybrid batch/jscript file (with .bat extension) that not require temp files.I've put unzip and zip capabilities in one file plus a few more features.

If on Windows 8 or Windows Server 2012 you'll have PowerShell and .NET 4.5 so you can do this:

zip.ps1 (usage: -directory <directory to zip up> -name <zip name>):

param (

    [string]$directory,

    [string]$name

)



Add-Type -Assembly System.IO.Compression.FileSystem

[System.IO.Compression.ZipFile]::CreateFromDirectory($directory, $name, [System.IO.Compression.CompressionLevel]::Optimal, $false)

zip.bat (if you need a helper to call PowerShell for you, the directory is first argument and the zip name second):

@Echo Off

powershell -ExecutionPolicy ByPass -Command "& '%~dpn0.ps1' -directory '%1' -name '%2'"