Usando o winrar no Vbscript

No artigo sobre noções básicas do Vbscript, comentei sobre a chamada de processos externos, como por exemplo o uso de arquivos de extensões bat.

Este artigo tem o objetivo de exemplificar o uso do Winrar para compactação de diretórios, em servidores de arquivo.

'** Linha comentada sobre o uso de programas externos.
objShell.Run strPath &"\process.bat", 0, True '** Listando os processos em TXT

Dados para o arquivo Bat

'**Para utilizarmos o Winrar através do MsDos podemos usar a chamada abaixo
c:
cd\
cd "program files"
cd winrar
RAR.exe a -ep1 -r0 -- %1.rar %2
%3 %2 /q '** Esta linha exclui o diretório recem compactado no servidor, você poderá usar ou não este, bastando comentar com a Tag REM no inicio da linha.
exit

Onde este arquivo bat recebe três parâmetros "%" 1,2 e 3.

Sendo estes:

%1 = Pasta que será compactada
..........Ex: c:\temp\dados

%2 = Nome do Arquivo que será gerado pelo Winrar
.......... Ex: dados_2009.04.01.rar

%3 = Linha de Comando que será executada após a execução
.......... Ex: md, rd, etcd

é isso ae, qualquer dúvida postem nos comentários ou mandem email.