[NiOl]

Код:

@Echo off
SetLocal EnableExtensions

Set Src=C:\TEMP\1\
Set Dst=C:\TEMP\2\
if not %Src:~-1%==\ set Src=%Src%\

PushD %Src%
for /f "delims=" %%D in ('DIR *.* /B /AD /OD') do set D=%%D
PopD

PushD %Dst%
md %D%
cd %D%
rem Ключи  /C /G /K могут быть лишними. (см XCopy /?)
xcopy %Src%%D% /E /H /R /Y /C /G /K
if ErrorLevel 1 Echo Не удалось скопировать %Src%%D% в %Dst% !!!
PopD