@echo off
color 0f&title 慕夜蓝化&echo,&echo,
setlocal enabledelayedexpansion
set str=c d e f g h i j k l m n o p q r s t u v w x y z
for %%i in (%str%) do (
    if exist %%i: set drive=!drive!,%%i:
)
echo,当前计算机下盘符：%drive:,= % &echo,&set/p=------ 按任意键开始 ------<nul&pause>nul&echo,&echo,
set/p ex=请输入扩展名——格式(*.mp3)or(mp3.*) :
for /f "delims=. tokens=1*" %%i in ("%ex%") do (
    if /i "%%i"=="*" (
        call :a %%j %drive:,= %
        ) else (
            call :a %%i %drive:,= %
    )
)

:a
set "dp=%~5\%~1"
md "%dp%" >nul 2>nul
call :b %drive:,= %
echo,若未复制或移动、删除文件，当前计算机的%ex%文件总数量为：%a%
echo,&echo,------ 按任意键退出 ------&pause>nul&exit

:b
if not "%~1"=="" (
    shift
    for /r %~1\ %%i in (%ex%) do (
        set/a a+=1
        set/a n+=1
        )
    if defined n (
        echo,%~1 盘下含有 %ex% 文件数量：!n!
        set "n="
        set/p imput=是否复制？(y/n^) :
        if /i "!imput!"=="y" ( 
            for /r %~1\ %%i in (%ex%) do (
                copy /y "%%~fsi" "%dp%" >nul 2>nul
                )
            echo,—— 复制完成 ——
            set/p input= 是否删除源文件？(y/n^) :
            if /i "!input!"=="y" del /s/q/f %~1\%ex% &echo, —— 已删除  ——
            set "input="
            goto :b
            ) else (
                goto :b
            )
        ) else (
            echo,%~1 盘下不存在 %ex% 文件
        goto :b
        )
    ) else (
        goto :eof
)
复制代码