unzip c:\path\to\file.zip [directory]

unzip.cmd

<!-- : 
@echo off
if [%1] equ [] (echo Missing file parameter. && echo unzip c:\path\to\file.zip [directory] && exit /b 1)
if %1 not exist (echo File not found. && echo unzip c:\path\to\file.zip [directory] && exit /b 2)
if [%2] not equ [] (if %2 not exist (mkdir %2 && if %errorlevel% not 0 (echo Invalid parameter. && echo unzip c:\path\to\file.zip [directory] && exit /b 3)))
if [%2] equ [] (cscript //nologo "%~f0?.wsf" /ZipFile:%1 /ExtractTo:%~dp0 //job:unzip && exit /b)
cscript //nologo "%~f0?.wsf" /ZipFile:%1 /ExtractTo:%2 //job:unzip
exit /b
--->
<package>
<job id="unzip">
<script language="VBScript">
Set Args = WScript.Arguments.Named
ZipFile = Args.Item("ZipFile")
ExtractTo = Args.Item("ExtractTo")
Set fso = CreateObject("Scripting.FileSystemObject")
If NOT fso.FolderExists(ExtractTo) Then
   fso.CreateFolder(ExtractTo)
End If
set objShell = CreateObject("Shell.Application")
set FilesInZip=objShell.NameSpace(ZipFile).items
objShell.NameSpace(ExtractTo).CopyHere(FilesInZip)
Set fso = Nothing
Set objShell = Nothing
</script>
</job>
</package>