outil de compression scriptable

Bonjour,

Je cherche actuellement un outil de compression
gratuit et facilement scriptable.

J'ai déjà repéré IZArc et Peazip mais dans les deux cas,
le fichier *.zip ( ou autre ...) est créé sur place
et l'on est obligé de le renommer puis de le déplacer
pour l'archiver finalement là où l'on veut...
Je trouve que cela fait un peu bricolo ;o)
De plus dans le cas de très grosses archives, cela
impose de disposer localement de beaucoup de place...

Peazip dispose quand même de quelques atouts
(la version portable existe )

Existe-t-il ( connaissez-vous) un outil du même type
qui permette en plus de choisir le nom et le lieu
de l'archive créée ?


Merci d'avance pour les contributions,

HB

Remarque :
Le script ci-dessous qui utilise ce "qui est intégré à windows"
semble poser des pb avec certains noms...
( j'ai eu des erreurs provoquées par des caractères "spéciaux" )

====================================================
DEST="<Chemin complet de l'archive à créer>"
SRC ="<Chemin complet du répertoire à compresser>"

Set oSh=CreateObject ("WScript.Shell")
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")
Set oWShell = CreateObject("Shell.Application")

Set FichZip = FSO.CreateTextFile(DEST, True)
FichZip.Write "PK" & Chr(5) & Chr(6) & String(18,VBNullChar)
FichZip.Close
Set FichZip = Nothing
' ===================================================
Set VirtFichZip = oWShell.NameSpace(DEST)
Set VirtSource = oWShell.NameSpace(SRC)
N = VirtSource.Items.Count

If N > 0 Then
For I = 0 To N - 1
VirtFichZip.CopyHere VirtSource.Items.Item(I), &h0&
On Error Resume Next
Do Until VirtFichZip.Items.Count = I + 1
WScript.Sleep(1000)
Loop
On Error Goto 0
Next
End If

Set VirtFichZip = Nothing
Set VirtSource = Nothing
Set OWShell = Nothing
====================================================