批处理内层For-Loop无法接收外层循环延迟扩展变量问题求助

问题背景 #

有一批MP4文件，文件名左侧格式不固定，但右侧下划线分隔的内容有规律，示例：

• Dancing_2022-10-30_00-05-32_015_Paris.mp4
• Eating_in_the_Restaurant_2022-07-03_04-21-25_497_London.mp4

需求：

1. 提取文件名最后一个下划线后的内容（如Paris、London）作为主文件夹名
2. 提取文件名中的日期部分（如2022-10-30、2022-07-03）作为子文件夹名
3. 创建两级文件夹结构，并将对应文件移入目标路径

核心难点：左侧文件名格式不统一，无法从左到右固定token位置提取目标内容；同时批处理中外层延迟扩展变量无法直接传递给内层for /F循环的tokens参数。

用户的尝试脚本（存在延迟扩展传递问题）：

@echo off
Setlocal EnableDelayedExpansion
    
for %%F in ("*.mp4") do (
    set file=%%~nF
    echo !file!
    set files="!file:_=" "!"
    echo file=!files!
    set cnt=-4
    for %%a in (!files!) do set /a cnt+=1
    echo !cnt!
    for /F "tokens=!cnt!* delims=_" %%a in ("!file!") do set output=%%b
    echo Output=%output%
    for /F "tokens=1-4 delims=_" %%a in ("!output!") do echo %%d
)
endlocal
pause

解决方案：利用字符串反转简化提取逻辑 #

不需要计算token数量，通过反转字符串将“从右提取”转化为“从左提取”，同时避免延迟扩展变量传递给for /F的问题。

完整脚本 #

@echo off
setlocal enabledelayedexpansion

:: 定义字符串反转函数
:reverseString
set "rev="
set "str=%~1"
:revLoop
if defined str (
    set "rev=!str:~0,1!!rev!"
    set "str=!str:~1!"
    goto revLoop
)
exit /b

for %%F in ("*.mp4") do (
    set "filename=%%~nF"
    set "ext=%%~xF"

    :: 反转文件名，将末尾内容转到开头
    call :reverseString "!filename!"
    set "reversed=!rev!"

    :: 从反转后的字符串提取：第一个token是反转后的城市，第四个token是反转后的日期
    for /f "tokens=1,4 delims=_" %%a in ("!reversed!") do (
        set "rev_city=%%a"
        set "rev_date=%%d"
    )

    :: 反转回原内容，得到正确的城市和日期
    call :reverseString "!rev_city!"
    set "city=!rev!"
    call :reverseString "!rev_date!"
    set "date=!rev!"

    :: 创建两级文件夹（如果不存在）
    if not exist "!city!\!date!" mkdir "!city!\!date!"

    :: 移动文件到目标路径
    move "%%F" "!city!\!date!\"
    echo 已移动文件：%%F -> !city!\!date!\
)

endlocal
pause

关键逻辑说明 #

1. 字符串反转函数：通过循环逐个字符拼接反转字符串，解决从右提取内容的痛点，无需计算左侧未知数量的token。
2. 提取目标内容：反转文件名后，原文件名的最后一个下划线内容（城市）变成反转字符串的第一个_分隔token；原日期部分位于倒数第4个_分隔位置，反转后对应第4个token，直接通过tokens=1,4提取即可。
3. 文件夹创建与移动：用if not exist判断文件夹是否存在，不存在则创建；最后移动文件到目标路径，完成整理。

原脚本失败原因 #

原脚本中for /F "tokens=!cnt!* delims=_"无法识别延迟扩展变量!cnt!，因为for /F的tokens参数在解析阶段就被固定，延迟扩展的变量无法在这个阶段生效。而通过反转字符串的方法，完全避开了动态指定tokens的需求，从根源解决了这个问题。

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