Script para Compactar Automaticamente

Bom dia.

Criei um script que tem como objetivo, compactar arquivos que não são mais utilizados, na qual é necessário mante-los por um determinado período.
Elenquei algumas pastas que são necessárias.
Esse procedimento deve ser feito uma vez por mês, deve agenda-lo para o 1º dia do mês.
É gerado um arquivo .rar com os arquivos anteriores ao dia 01 do mês X do ano X.
O nome do arquivo é composto pelo mês anterior ao dia 01 do mês X.

___________________________________________________________________

@echo off
title COMPACTAR ARQUIVOS
color 0a

:: Formato da Data/Hora depende da Opções Regionais
for %%A in (%date%) do (set dt=%%A)
set dia=%dt:~0,2%
set mes=%dt:~3,2%
set ano=%dt:~6,4%
set data=%ano%%mes%01
:: Caminho do Arquivo de Log + Data/Hora
set arqLog="C:\Documents and Settings\Administrador\Desktop\Rotinas Backup\Logs\Log_Compactacao_%dia%%mes%%ano%.log"

IF "%mes%"=="01" (
set mes2=DEZ
)
IF "%mes%"=="02" (
set mes2=JAN
)
IF "%mes%"=="03" (
set mes2=FEV
)
IF "%mes%"=="04" (
set mes2=MAR
)
IF "%mes%"=="05" (
set mes2=ABR
)
IF "%mes%"=="06" (
set mes2=MAI
)
IF "%mes%"=="07" (
set mes2=JUN
)
IF "%mes%"=="08" (
set mes2=JUL
)
IF "%mes%"=="09" (
set mes2=AGO
)
IF "%mes%"=="10" (
set mes2=SET
)
IF "%mes%"=="11" (
set mes2=OUT
)
IF "%mes%"=="12" (
set mes2=NOV
)


echo ########## COMPACTACAO DE ARQUIVOS - %date% - %time% ########## >> %arqLog%
echo. >> %arqLog%
:: Caminho do WinRAR
cd "C:\Arquivos de programas\WinRAR"

:: Explicação do Comando:
:: a [Adicionar arquivos para o arquivo]
:: -n [Incluir somente arquivo especificado]
:: -tb [Processar arquivos modificados anterior <data> no formato YYYYMMDDHHMMSS]
:: -df [Excluir arquivos após compressao]
:: -m3 [m<0..5> Configurar nível de compressao (0-mín...3-padrao...5-máx)]
:: caminho destino e caminho dos arquivos a serem processados

:: PROCAD
rar a -n*.xml -n*.log -tb%data% -df -m5 "C:\SAV\Mod\TransientStorage\Associador\BCK\%mes2%_%ano%.rar" "C:\SAV\Mod\TransientStorage\Associador" >> %arqLog%
rar a -n*.xml -n*.log -tb%data% -df -m5 "C:\SAV\Mod\TransientStorage\Visitas\BCK\%mes2%_%ano%.rar" "C:\SAV\Mod\TransientStorage\Visitas" >> %arqLog%

:: SIV
rar a -n*.* -tb%data% -df -m5 "E:\SIV_SERVER\BKP_FAT\old\%mes2%_%ano%.rar" "E:\SIV_SERVER\BKP_FAT" >> %arqLog%
rar a -n*.* -tb%data% -df -m5 "E:\SIV_SERVER\CONSOLIDADOR\BCK\%mes2%_%ano%.rar" "E:\SIV_SERVER\CONSOLIDADOR" >> %arqLog%
rar a -n*.* -tb%data% -df -m5 "E:\SIV_SERVER\Contrato\BCK\%mes2%_%ano%.rar" "E:\SIV_SERVER\Contrato" >> %arqLog%
rar a -n*.* -tb%data% -df -m5 "E:\SIV_SERVER\GPS\BCK\%mes2%_%ano%.rar" "E:\SIV_SERVER\GPS" >> %arqLog%
rar a -n*.* -tb%data% -df -m5 "E:\SIV_SERVER\WP\BCK\%mes2%_%ano%.rar" "E:\SIV_SERVER\WP" >> %arqLog%

echo. >> %arqLog%
echo ########## COMPACTACAO FINALIZADA - %date% - %time% ########## >> %arqLog%
echo. >> %arqLog%

___________________________________________________________________