小脚本bat

windos 备份自动压缩文件程序

@echo off
setlocal

:: 获取当前日期并将其转换为适合作为文件名的格式（年月日）
for /f "tokens=1-3 delims=-/ " %%a in ('echo %date%') do (
    set "dateStamp=%%a%%b%%c"
)
set "sourceFolder=D:\winara"
set "destinationZip=D:\winara\%dateStamp%.rar"  REM 设置压缩文件名（按年月日命名）
set "rarPath=D:\winara\WinRAR\Rar.exe"  REM WinRAR 安装路径

if exist "%rarPath%" (
    "%rarPath%" a -r "%destinationZip%" "%sourceFolder%\*"
    echo 文件夹已压缩为 RAR 文件：%destinationZip%
) else (
    echo WinRAR未安装或路径不正确。
)

exit