基于CSV文件名前缀数字批量建文件夹并移文件的批处理需求

嘿，我帮你把这个按CSV文件名前缀分类的批处理需求理清楚，还优化了现有代码，一起来看看：

需求说明 #

• 核心目标：根据CSV文件名下划线前的前缀数字，把同一文件夹里的文件分类到指定目标文件夹
• 示例文件路径：
  • C:\FDM\FDMConversion\890_AMMC1_Recording_2012.csv
  • C:\FDM\FDMConversion\898000_AMMC1_Recording_2012.csv
• 分类规则：
  • 前缀890 → 移入sample1文件夹
  • 前缀898000 → 移入sample2文件夹

现有代码问题分析 #

先看看你提供的原始代码，它存在几个可以优化的点：

set filename="C:\FDM\FDMConversion\*.csv" 
for /f %%i in ('dir %filename% /b /a-d ') do ( 
    set "filename=%%~i" 
    for /f "delims=_ tokens=1" %%a in ('echo !filename!') do ( 
        rem rem set folder=%%a 
        If "%%a"=="890" ( 
            set sample1=%%a 
            mkdir "C:\FDM\FDMConversion\!sample1!" 2>nul 
            for /f "delims=_ tokens=1" %%a in ('echo !filename!') do set ade=%%a 
            pushd "C:\FDM\FDMConversion" 
            for /r %%a in ("\!ade!*.csv" ) do ( 
                move /Y "%%a" "C:\FDM\FDMConversion\!ade!\%%~nxa" 
            ) 
            popd 
        ) 
        If "%%a"=="898000" ( 
            set sample2=%%a 
            mkdir "C:\FDM\FDMConversion\!sample2!" 2>nul 
            for /f "delims=_ tokens=1" %%a in ('echo !filename!') do set ade=%%a 
            pushd "C:\FDM\FDMConversion" 
            for /r %%a in ("\!ade!*.csv" ) do ( 
                move /Y "%%a" "C:\FDM\FDMConversion\!ade!\%%~nxa" 
            ) 
            popD 
        ) 
    ) 
)

• 冗余逻辑：重复写了前缀提取、pushd/popd和移动文件的代码，维护起来麻烦
• 不符合需求：创建的文件夹是前缀数字本身（比如890），而不是要求的sample1
• 变量使用混乱：多次重复定义同名变量，容易出错
• 效率不高：嵌套了多层不必要的循环

优化后的批处理脚本 #

下面是优化后的版本，更简洁高效，完全符合你的需求：

@echo off
setlocal enabledelayedexpansion

:: 定义根文件夹路径，方便后续修改
set "rootDir=C:\FDM\FDMConversion"
cd /d "%rootDir%"

:: 遍历当前目录下所有CSV文件（仅文件名，不含路径）
for /f "delims=" %%i in ('dir /b /a-d *.csv') do (
    :: 提取文件名的前缀部分（下划线前的数字）
    for /f "delims=_ tokens=1" %%a in ("%%~ni") do (
        set "prefix=%%a"
        set "targetFolder="
        
        :: 根据前缀匹配对应的目标文件夹名
        if "!prefix!"=="890" set "targetFolder=sample1"
        if "!prefix!"=="898000" set "targetFolder=sample2"
        
        :: 如果匹配到有效目标文件夹，执行创建和移动
        if defined targetFolder (
            :: 创建文件夹，2>nul忽略已存在的错误提示
            mkdir "!targetFolder!" 2>nul
            :: 移动文件到目标文件夹，/Y覆盖同名文件
            move /Y "%%i" "!targetFolder!\"
        )
    )
)

endlocal
echo 所有CSV文件分类完成！

优化点说明 #

• 启用enabledelayedexpansion：确保循环内部的变量能正常更新取值
• 统一根目录变量：后续要修改路径时，只改一处即可
• 简化前缀提取：直接用%%~ni获取不含扩展名的文件名，避免额外的echo命令
• 清晰的规则匹配：直接映射前缀到要求的sample1/sample2文件夹
• 移除冗余操作：删掉了重复的循环和不必要的目录切换，提升执行效率
• 友好提示：执行完成后给出明确的提示信息

内容的提问来源于stack exchange，提问作者great77