求助：编写Batch脚本实现文件按规则复制到对应目录

嘿，我来帮你搞定这个Batch脚本的需求，顺便分析下你提到的那个类似脚本的问题所在~

在Batch脚本里，静态的字符串截取很简单，比如%filename:~0,5%就是取前5个字符，但如果是动态的截取长度（比如用户输入要移除右侧N个字符，那截取长度就是「原长度-N」），就得用上延迟变量扩展，因为普通的百分号变量在代码块里（比如for循环、if判断）不会实时更新。

举个例子，假设用户输入要移除的字符数是remove_chars，那截取文件名前缀的写法应该是：

setlocal enabledelayedexpansion
set "file_name=NewDoc_Ver1"
set "target_name=!file_name:~0,-%remove_chars%!"
rem 比如remove_chars=4的话，target_name就会是NewDoc

这里的!就是延迟变量的标记，-%remove_chars%表示从右侧移除指定数量的字符，刚好符合你的需求~

下面是满足你三个需求的完整脚本，每一步都加了注释，你可以直接用：

@echo off
setlocal enabledelayedexpansion

:: 1. 询问源文件所在目录
set /p "source_dir=请输入源文件所在目录（比如D:\docs）："
:: 检查目录是否存在
if not exist "%source_dir%\" (
    echo 错误：源目录不存在！
    pause
    exit /b
)

:: 2. 询问目标目录
set /p "target_root=请输入目标根目录（比如E:\sorted_docs）："
:: 自动创建目标目录（如果不存在）
if not exist "%target_root%\" mkdir "%target_root%\"

:: 3. 指定从目录名右侧移除的字符数
set /p "remove_chars=请输入要从文件名右侧移除的字符数（比如4）："
:: 验证输入是数字
echo %remove_chars% | findstr /r "^[0-9][0-9]*$" >nul
if errorlevel 1 (
    echo 错误：请输入有效的正整数！
    pause
    exit /b
)

:: 遍历源目录下的所有文件（不含子目录）
for %%f in ("%source_dir%\*.*") do (
    :: 获取文件名（不含扩展名）
    set "file_name=%%~nf"
    :: 截取文件名前缀（移除右侧指定字符数）
    set "target_dir_name=!file_name:~0,-%remove_chars%!"
    :: 拼接目标子目录路径
    set "target_dir=%target_root%\!target_dir_name!"
    :: 创建目标子目录（如果不存在）
    if not exist "!target_dir!\" mkdir "!target_dir!"
    :: 复制文件到目标子目录
    copy "%%f" "!target_dir!\" >nul
    echo 已复制："%%~nxf" -> "!target_dir!\"
)

echo 所有文件处理完成！
pause
exit /b

你说那个脚本只能在自身目录运行，还不支持目录名截断，大概率是这两个原因：

• 只能在自身目录运行：脚本里没有通过set /p读取用户输入的源目录，而是直接遍历当前目录的文件，比如用了for %%f in (*.*)，没有指定源路径参数。这种写法只能处理脚本所在目录的文件，没法指定其他目录。
• 不支持目录名截断：脚本里没有处理文件名的截取逻辑，直接用原文件名创建目录（比如mkdir "%%~nf"），而且没有用到延迟变量扩展来处理动态的截取长度，所以没法实现“移除右侧N个字符”的需求。

这样应该就解决你的问题啦，有疑问的话可以随时调整~

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