[文件操作] 【已解决】求批处理提取文件夹里指定类型的所有文件

@echo off & setlocal enabledelayedexpansion
::改成自己的路径，如“D:\Test”
set "source=%~dp01"
::改成自己的路径
set "target=%~dp02"
echo;开始复制，稍等。。。。
for /f "delims=" %%i in ('dir /b /s /a-d %source%\*.mp3') do (
	set "file=%%~fi"
	echo;复制文件———!file!
	for /f "usebackq" %%a in ('%source%') do (
		set "ref=!file:%%a\=!"
		echo;f|xcopy /y "!file!" "%target%\!ref!">nul 2>&1
	)
)
echo;完成。
pause & exit /b
复制代码

@echo off & setlocal enabledelayedexpansion
set "source=%~dp0"
set "target=%~dp0copy"
echo;开始复制，稍等。。。。
for /f "delims=" %%i in ('dir /b /s /a-d %source%\*.mp3') do (
	set "file=%%~fi"
	if "!target:%%~fi=!" equ "!target!" (
		echo;复制文件———!file!
		for /f "usebackq" %%a in ('%source%') do (
			set "ref=!file:%%a=!"
			echo;f|xcopy /y "!file!" "%target%\!ref!">nul 2>&1
		)
	)
)
echo;完成。
pause & exit /b
复制代码

xcopy "%~dp0*.mp3" \copy\ /s
move \copy copy
pause
复制代码

dir /b /s /a-d "%source%\*.mp3" "%source%\*.wma" "%source%\*.wav"
复制代码

@echo off & setlocal enabledelayedexpansion
set "source=%~dp0"
set "target=%~dp0copy"
echo;开始复制，稍等。。。。
set /p exts=请输入要提取的类型(多个空格隔开)：
set dircmd=dir /b /s /a-d
for %%i in (%exts%) do set dircmd=!dircmd! "%source%*.%%i"
for /f "delims=" %%i in ('%dircmd%') do (
	......
)
pause & exit /b
复制代码

@echo off
set /p exts=请输入要提取的类型(多个空格隔开)：
for %%i in (%exts%) do (
	xcopy "%~dp0*.%%i" \copy\ /s
)
move \copy copy
pause
复制代码

@echo off & setlocal enabledelayedexpansion
set "source=%~dp0"
set "target=%~dp0copy"
echo;开始复制，稍等。。。。
set /p exts=请输入要提取的类型(多个空格隔开)：
set dircmd=dir /b /s /a-d
for %%i in (%exts%) do set dircmd=!dircmd! "%source%*.%%i"
for /f "delims=" %%i in ('%dircmd%') do (
	......
)
pause & exit /b
复制代码

move \copy "co    py"
复制代码

	set "file=%%~fi"
	if "!target:%%~fi=!" equ "!target!" (
		echo;复制文件———!file!
		for /f "usebackq" %%a in ('%source%') do (
			set "ref=!file:%%a=!"
			echo;f|xcopy /y "!file!" "%target%\!ref!">nul 2>&1
		)
	)
复制代码