结合前缀和时间戳的文件夹名称为新的文件夹多个文件夹，只需前缀

Question

所以，这对我来说是一个特别令人费解的问题。我愿意使用我必须做的任何事情，但我通常只写简单的批处理文件。

我在我工作的医院庞大的研究项目，我与呈现给我一个4位数字的主题标识符后跟一个时间戳处理的数据，如在这个例子中：

6443_20170419_141200416
6443_20170419_141200447
6443_20170419_141200500
6476_20170419_141200537
6476_20170419_141201112
等

我已经点燃几千个这样的文件夹，每个文件夹都有1到3个文件名很长的文件 - 唯一的共同点就是.DCM扩展名。

我想什么做的是有一个脚本，将提取的第4个字符的文件夹名称，创建具有4个字符的名称一个新的目录，然后将位于文件夹中具有匹配前缀到任何文件新创建的文件夹。

例如，假设所有以6443开头的文件夹都有几个.DCM文件。我想创建一个名为6443的新文件夹（位于与当时当前目录不同的位置，以避免意外删除），然后将所有.DCM文件从每个目录移动到新文件夹中。

我有一个包含一个.TXT文件的一切，我一直在使用各种脚本等任务，使用FOR/F走这个文件，如果让所有人都有了一个想法解决的课题编号的的。

这曾经是真正的picklin'我noggin。帮帮我！！！

-----其他信息----- 我一直在进步，但它仍然是不正确的。我使用的脚本如下图所示，但它的移动，而不是由4位前缀排序他们都在各自的文件夹，每个新创建的文件夹中的文件。

@ECHO on 
cls 

FOR /f "delims=_" %%a IN ('dir /b /ad "*_*_*"') DO (
    if not exist %%a MD .\combined\%%a 
    FOR /d /r %%d IN ("*") DO (
    copy %%d\* .\combined\%%a\* 
    ) 
) 

Answer 1

这里是修正后的脚本：

@echo on 
cls 

for /F "tokens=1* delims=_" %%a in ('dir /B /A:D "????_*"') do (
    if not exist ".\combined\%%a\" md ".\combined\%%a" 
    copy ".\%%a_%%b\*.dcm" ".\combined\%%a" 
) 

我改变什么：

• 的tokens选项已被添加到外for /F循环为了能够重建稍后的原始源目录名称;
• 目录搜索模式已经改进;
• if查询检查错误的目录;
• 内部for循环已被删除，因为它重复遍历所有源目录;
• copy命令的源和目标路径已被修改;
• 所有路径都被正确引用;