中国DOS联盟

@echo off
mode con cols=78 lines=3&color b0
setlocal enabledelayedexpansion
Title 载入中...


::备份文件次数,超过此次数，依次向前替换上一次备份 [自定义]
set strBakCount=10
::备份路径
set strBakPath=BakFile
::备份类型
set strFo=*.txt



::备份文件夹初始化
md !strBakPath!\ >nul 2>nul
md ...\ >nul 2>nul
for /l %%i in (0,1,!strBakCount!) do (
        md !strBakPath!\!strBakPath!s%%i >nul 2>nul
        attrib +s +a +r !strBakPath!\!strBakPath!s%%i)
::初始化与读取操作数SaveCount
if not exist !strBakPath!\!strBakPath!s0\DatSet.dat echo SaveCount=0 >!strBakPath!\!strBakPath!s0\DatSet.dat
for /f "tokens=1-2 delims==" %%i in ('type !strBakPath!\!strBakPath!s0\DatSet.dat') do (
        if /i "%%i"=="SaveCount" set strSaveCount=%%j
        if /i "%%i"=="DateTime" set strDateTime=%%j)
set /a strSaveCount+=0
Title !strBakPath! - 文档上限:!strBakCount! - 已存在!strSaveCount!次备份 - 最后备份时间:!strDateTime!
echo.&echo                             按任意键开始备份...&pause>nul

::备份操作判断
if !strSaveCount! geq !strBakCount! (
        ::备份文件夹已满
        for /l %%i in (1,1,!strBakCount!) do (
                set /a strTmp=%%i - 1
                move /y !strBakPath!\!strBakPath!s%%i\!strFo! !strBakPath!\!strBakPath!s!strTmp!\)
        copy /y !strFo! !strBakPath!\!strBakPath!s!strBakCount!\ >nul 2>nul
)else (
        ::备份文个夹未满
        set /a strSaveCount+=1
        copy /y !strFo! !strBakPath!\!strBakPath!s!strSaveCount!\ >nul 2>nul)
::后续操作
del /q !strBakPath!\!strBakPath!s0\!strFo! >nul 2>nul
echo SaveCount=!strSaveCount! >!strBakPath!\!strBakPath!s0\DatSet.dat
echo DateTime=%date:~0,10%,%time:~0,5% >>!strBakPath!\!strBakPath!s0\DatSet.dat
cls&echo.&echo                             备份完成.&pause>nul