[Iska]

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

set sSourceFolder=C:\1

if exist "%sSourceFolder%\." (
	for /d %%i in ("%sSourceFolder%\*.*") do (
		move "%%~i\*.*" "%sSourceFolder%\"
		rd "%%~i"
	)
) else (
	echo Can't find source folder [%sSourceFolder%].
	exit /b 1
)

endlocal
exit /b 0

Существующие файлы будут перезаписаны без предупреждения. Аналогично и с одноимёнными в исходных подкаталогах — останется только перемещённый последним.

[Foreigner]

Rema, с проверкой на наличие файлов с одинаковым именем

Код:

@echo off
setlocal

for %%i in (x y z) do if not exist %%i: set disk=%%i:

subst %disk% "C:\1"
pushd %disk% || goto:eof

for /f "tokens=*" %%i in (' dir /b /s /a-d ') do call:move "%%i"
for /f %%i in (' dir /b /ad ') do rd /s /q "%%i"

popd
subst %disk% /d
goto:eof


:move

set "file=%~nx1%"
set "cnt="

:check
    
set /a cnt+=1
if not exist "%file%" ( move %1 "%file%" ) else (

    set "file=%~n1_%cnt%%~x1"
    goto:check
    
)

[Rema]

Iska, отлично решило мою задачу.

Foreigner, получилось что батник нашел файлы в подкаталогах каталога, переместил их в каталог, содержащий данные подкаталоги, удалил подкаталоги, но зачем то переименовал эти файлы...

[Georgio]

Foreigner, а "subst" применили, чтобы уменьшить возможные ошибки "dir"?

[Foreigner]

Georgio,

Случайно получилось... Перепутал с другой типовой задачей (обрезка пути). Конечно можно без subst

но зачем то переименовал эти файлы... »

Все? Или только те, которые с одинаковым именем?