Xcopy und exclude

@echo off
rem Erstellt von Andres Webdesign
rem Stand: 2.10.2023
chcp 65001 >nul

set copyvon=E:\SmartStore.biz Projekte\SM6\Kunden Shops\Rosemarie\Hundeshop NEU
set Pfad=g:\sicherung
set Verzeichnis=hundeshop

rem unterschiedliche Schriftfarben
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (set "DEL=%%a")    
goto :Ueberspringen
:Farben
<nul set /p ".=%DEL%" > "%~2"    
findstr /v /a:%1 /R "^$" "%~2" nul    
del "%~2" > nul 2>&1    
goto :eof
:Ueberspringen


REM Archivnamen zusammensetzen
set ARCHIVNAME=sicherung-%DATE%

REM Verzeichnis erstellen
if not exist %Pfad%\%Verzeichnis%\%ARCHIVNAME%\ (
mkdir %Pfad%\%Verzeichnis%\%ARCHIVNAME%\
xcopy "%copyvon%\*.*" "%Pfad%\%Verzeichnis%\%ARCHIVNAME%\" /E /exclude:\Logs\[+\Temp\][+\media\][+Hundeshop NEU (Autosicherung).mdb.zip]  
rem robocopy %copyvon%\*.* %folder%\ /E /Z /XD "%copyvon%\media\" "%copyvon%\Logs\" "%copyvon%\Temp\" /XF "Hundeshop NEU (Autosicherung).mdb.zip"  
cls
Call :Farben A "Die Datensicherung von %Verzeichnis% wurde erstellt und alle Daten kopiert."  
echo.&echo.
echo Drücke eine beliebige Taste, um das Programm zu beenden.
pause>nul
goto ende
) else if exist %Pfad%\%Verzeichnis%\%ARCHIVNAME%\ (
cls
Call :Farben C "Die Datensicherung von %ARCHIVNAME% exitiert bereits"   
echo.&echo.
echo ############################################################
echo # Sie können maximal 3 Sicherungskopien täglich erstellen. #
echo ############################################################
echo.&echo.
:auswahl
echo Möchten Sie eine neue Sicherheitskopie erstellen? (j / n)
SET /p wahl=
if '%wahl%' == 'n' goto Nein  
if '%wahl%' == 'j' goto Ja  
echo Sie haben eine falsche Taste gedrückt
echo.&echo.
Goto auswahl
:Ja
@echo off &setlocal enabledelayedexpansion
set root=%Pfad%\%Verzeichnis%
set prefix=%ARCHIVNAME%
set max=2
set cnt=1
set "folder=%root%\%prefix%"    
:loop
if not exist "!folder!" (    
    md "!folder!"    
rem xcopy "%copyvon%\*.*" "%Pfad%\%Verzeichnis%\%ARCHIVNAME%\" /E /exclude:g:\sicherung\batch\exclude.txt  
xcopy "%copyvon%\*.*" "%Pfad%\%Verzeichnis%\%ARCHIVNAME%\" /E /exclude:%copyvon%\Logs\[+%copyvon%\Temp\][+%copyvon%\media\][+%copyvon%Hundeshop NEU (Autosicherung).mdb.zip]  
    goto :end
) else (
    if !cnt! GTR %max% goto :end
    set "folder=%root%\%prefix%-!cnt!"    
    set /a cnt+=1
    goto :loop
)
:end
if exist "%root%\%prefix%-2" (  
Call :Farben C "Die maximale Anzahl der Sicherungskopien sind erreicht.  
echo.&echo.
echo Drücke eine beliebige Taste, um das Programm zu beenden.
pause>nul
goto :ende
) else (
goto :ende
)
:Nein
goto ende
)
:ende
exit