@echo off
for /d %%a in (*) do (
pushd %%a
for /f "delims=" %%i in ('dir /b /s /a-d') do move "%%i" "%%a%%~nxi"
popd
)
pause
复制代码

function New-FileName {
	param([string]$dir, [string]$baseName, [string]$extension, [int]$n=1);
	$targetName=[IO.Path]::Combine($dir, $baseName + $extension);
	if (![IO.File]::Exists($targetName)) {
		return $targetName;
	}
	else {
		$baseName=($baseName -replace '\s*\(\d+\)\s*$') + '(' + $n++ + ')';
		return New-FileName -dir $dir -baseName $baseName -extension $extension -n $n;
	}
}

(ls|?{$_.PsIsContainer}).Foreach{
	$folderPath=$_.FullName;
	$childFolders=ls $folderPath -r|?{$_.PsIsContainer}|sort @{e={$_.FullName.Length}; Ascending=$true};
	# $folderName=$_.Name;
	foreach ($childFolder in $childFolders) {
		# $folderName += '_' + $childFolder.Name;
		(ls $childFolder.FullName|?{!$_.PsIsContainer}).Foreach{
			$baseName=[IO.Path]::GetFileNameWithoutExtension($_.Name);
			$extension=[IO.Path]::GetExtension($_.Name);
			$newFile=New-FileName -dir $folderPath -baseName $baseName -extension $extension;
			Move-Item $_.FullName -dest $newFile -Verbose -Force;
		}
	}
	[IO.Directory]::Delete($childFolders[0].FullName, $true);
	# Rename-Item $folderPath -NewName $folderName -Force;
}
&cmd /c pause
复制代码

@echo off
setlocal enabledelayedexpansion
for /d %%a in (*) do (
pushd %%a
for /f "delims=" %%i in ('dir /b /s /a-d') do (
    if not exist "%%a%%~nxi" (move "%%i" "%%a%%~nxi") else (
        if not exist "%%a%%~ni (2)%%~xi" (move "%%i" "%%a%%~ni (2)%%~xi") else (
            set n=2
            for %%j in ("%%a%%~ni (*)%%~xi") do (
                set "str=%%~nj"
                set "m=!str:%%a%%~ni (=!"
                set "m=!m:)=!"
                if !m! gtr !n! set /a n=m
            )
            set /a n+=1
            move "%%i" "%%a%%~ni (!n!)%%~xi"
        )
    )
)
popd
)
pause
复制代码