[文件操作] 请教各位大神如何缩编文件分类的批处理代码呢？

feixiang8209

下面是写好的代码，已经可以分了，但是还有很多文件夹都是类似的命名规则，想请问下要如何缩减代码呢？

cd /d "%~dp0"\H104
for /f "delims=" %%a in ('dir /a-d /b "*D8050*" 2^>nul') do (
    if not exist "D8050" md "D8050-D8051"
    move "%%a" "D8050-D8051"
)
for /f "delims=" %%a in ('dir /a-d /b "*D8051*" 2^>nul') do (
    if not exist "D8051" md "D8050-D8051"
    move "%%a" "D8050-D8051"
)
for /f "delims=" %%a in ('dir /a-d /b "*D4060*" 2^>nul') do (
    if not exist "D4060" md "D4060"
    move "%%a" "D4060"
)
for /f "delims=" %%a in ('dir /a-d /b "*D4060*" 2^>nul') do (
    if not exist "D4060" md "D4060"
    move "%%a" "D4060"
)
for /f "delims=" %%a in ('dir /a-d /b "*D9061--36_x24*" 2^>nul') do (
    if not exist "D9061--36_x24" md "D9061-36x24"
    move "%%a" "D9061-36x24"
)
for /f "delims=" %%a in ('dir /a-d /b "*D9061--72_x48*" 2^>nul') do (
    if not exist "D9061--72_x48" md "D9061-72x48"
    move "%%a" "D9061-72x48"
)
for /f "delims=" %%a in ('dir /a-d /b "*D1612*" 2^>nul') do (
    if not exist "D1612" md "D1612"
    move "%%a" "D1612"
)
for /f "delims=" %%a in ('dir /a-d /b "*D4060*" 2^>nul') do (
    if not exist "D4060" md "D4060"
    move "%%a" "D4060"
)
for /f "delims=" %%a in ('dir /a-d /b "*D6190*" 2^>nul') do (
    if not exist "D6190" md "D6190"
    move "%%a" "D6190"
)
for /f "delims=" %%a in ('dir /a-d /b "*D5050*" 2^>nul') do (
    if not exist "D5050" md "D5050"
    move "%%a" "D5050"
)
for /f "delims=" %%a in ('dir /a-d /b "*D5040*" 2^>nul') do (
    if not exist "D5040" md "D5040"
    move "%%a" "D5040"
)
for /f "delims=" %%a in ('dir /a-d /b "*D5060*" 2^>nul') do (
    if not exist "D5060" md "D5060"
    move "%%a" "D5060"
)
cd /d "%~dp0"\H164
for /f "delims=" %%a in ('dir /a-d /b "*ZY1370*" 2^>nul') do (
    if not exist "ZY1370" md "ZY1370-ZY003-S"
    move "%%a" "ZY1370-ZY003-S"
)
for /f "delims=" %%a in ('dir /a-d /b "*ZY003-S*" 2^>nul') do (
    if not exist "ZY003-S" md "ZY1370-ZY003-S"
    move "%%a" "ZY1370-ZY003-S"
)
for /f "delims=" %%a in ('dir /a-d /b "*ZY003-M*" 2^>nul') do (
    if not exist "ZY003-M" md "ZY003-M"
    move "%%a" "ZY003-M"
)

cd /d "%~dp0"\H174
for /f "delims=" %%a in ('dir /a-d /b "*MMT01--50_x40*" 2^>nul') do (
    if not exist "MMT01--50_x40" md "MMT01-50x40"
    move "%%a" "MMT01-50x40"
)
for /f "delims=" %%a in ('dir /a-d /b "*MMT01--60_x50*" 2^>nul') do (
    if not exist "MMT01--60_x50" md "MMT01-60x50"
    move "%%a" "MMT01-60x50"
)
for /f "delims=" %%a in ('dir /a-d /b "*MMT01--80_x60*" 2^>nul') do (
    if not exist "MMT01--80_x60" md "MMT01-80x60"
    move "%%a" "MMT01-80x60"
)
for /f "delims=" %%a in ('dir /a-d /b "*MT002--50_x40*" 2^>nul') do (
    if not exist "MT002--50_x40" md "MT002-50x40"
    move "%%a" "MT002-50x40"
)
for /f "delims=" %%a in ('dir /a-d /b "*MT002--60_x50*" 2^>nul') do (
    if not exist "MT002--60_x50" md "MT002-60x50"
    move "%%a" "MT002-60x50"
)
for /f "delims=" %%a in ('dir /a-d /b "*MT002--80_x60*" 2^>nul') do (
    if not exist "MT002--80_x60" md "MT002-80x60"
    move "%%a" "MT002-80x60"
)
for /f "delims=" %%a in ('dir /a-d /b "*YG003-50_x40*" 2^>nul') do (
    if not exist "YG003-50_x40" md "YG003-50x40"
    move "%%a" "YG003-50x40"
)
for /f "delims=" %%a in ('dir /a-d /b "*YG003-60_x50*" 2^>nul') do (
    if not exist "YG003-60_x50" md "YG003-60x50"
    move "%%a" "YG003-60x50"
)
for /f "delims=" %%a in ('dir /a-d /b "*YG003-80_x60*" 2^>nul') do (
    if not exist "YG003-80_x60" md "YG003-80x60"
    move "%%a" "YG003-80x60"
)
for /f "delims=" %%a in ('dir /a-d /b "*MT3040*" 2^>nul') do (
    if not exist "MT3040" md "MT3040"
    move "%%a" "MT3040"
)
for /f "delims=" %%a in ('dir /a-d /b "*HT001-50_x40*" 2^>nul') do (
    if not exist "HT001-50_x40" md "HT001-50x40"
    move "%%a" "HT001-50x40"
)
for /f "delims=" %%a in ('dir /a-d /b "*HT001-60_x50*" 2^>nul') do (
    if not exist "HT001-60_x50" md "HT001-60x50"
    move "%%a" "HT001-60x50"
)
for /f "delims=" %%a in ('dir /a-d /b "*HT001-80x60*" 2^>nul') do (
    if not exist "HT001-80_x60" md "HT001-80x60"
    move "%%a" "HT001-80x60"
)
for /f "delims=" %%a in ('dir /a-d /b "*HT001-40_x30*" 2^>nul') do (
    if not exist "HT001-40_x30" md "HT001-40x30"
    move "%%a" "HT001-40x30"
)
for /f "delims=" %%a in ('dir /a-d /b "*HT001-80_x60*" 2^>nul') do (
    if not exist "HT001-80_x60" md "HT001-80x60"
    move "%%a" "HT001-80x60"
)
for /f "delims=" %%a in ('dir /a-d /b "*S4321*" 2^>nul') do (
    if not exist "S4321" md "S4321"
    move "%%a" "S4321"
)
for /f "delims=" %%a in ('dir /a-d /b "*S5020*" 2^>nul') do (
    if not exist "S5020" md "S5020"
    move "%%a" "S5020"
)
复制代码

以下是各个文件夹的分类与名称规则，请大神赐教，万分感谢！！！！！
H104文件夹分为：D8050与D8051合并、D9061--36_x24、D9061--72_x48、D1612、D4060、D6190、D5050、D5040、D50609个文件夹，文件名规则如下：
H1040001-UA3UKX-1-D8050--OneSize-90DPI-NO3-White-1-printArea-8568670.jpg
H1040003-EYT44Y-2-D9061--36_x24_-90DPI-NO1-White-1-printArea-8121215.jpg
H1040024-FJD6IK-1-D9061--72_x48_-90DPI-NO1-White-1-printArea-8373753.jpg
H1040027-ED3BSN-1-D1612--OneSize-90DPI-NO1-White-1-printArea-7856381.jpg
H1040047-7AO7KB-1-D4060-OneSize-90DPI-NO1-White-1-printArea-7866858.jpg
H1040072-UZNBVV-1-D6190-OneSize-90DPI-NO1-White-1-printArea-4601401.jpg
H1040077-PFT3UK-1-D8051-OneSize-90DPI-NO1-Black-1-printArea-6824873.jpg
H1040089-RNKNBY-1-D5050-OneSize-90DPI-NO1-Black-1-printArea-5968736.jpg
H1040117-4FAS7U-1-D5040-OneSize-90DPI-NO1-Black-1-printArea-8569865.jpg
H1040125-D5DXAT-1-D5060-OneSize-90DPI-NO1-Black-1-printArea-8573272.jpg

H144文件夹分为D2014、D6084两个文件夹，文件名规则如下：
H1440003-FEA9NL-1-D2014--OneSize-90DPI-NO1-White-1-printArea-8392841.jpg
H1440007-SGFRHR-1-D6084--OneSize-90DPI-NO1-Black-1-printArea-5723987.jpg
H164文件夹分为ZY1370与ZY003-S合并、ZY003-M两个文件夹
H1640008-E6PUSY-1-ZY1370-OneSize-90DPI-NO1-White-1-printArea-2428852.jpg
H1640059-ROULYY-1-ZY003-S-90DPI-NO1-White-1-printArea-8565020.jpg
H1640073-JF6TBD-1-ZY003-M-90DPI-NO1-White-1-printArea-8284474.jpg

H174文件夹分为MT002--50_x40、MMT01--50_x40、MMT01--60_x50、MMT01--80_x60、S4321、S5020、MT002--60_x50、MT002--80_x60、YG003-50_x40、YG003-60_x50、YG003-80_x60、MT3040、HT001-50_x40、HT001-60_x50、HT001-80_x60共15个文件夹，文件名称规则如下：
H1740003-P72JFB-4-MT002--50_x40_-90DPI-NO1-Black-1-printArea-7524221.jpg
H1740003-UEN42N-1-MMT01--50_x40_-90DPI-NO1-Black-1-printArea-8572489.jpg
H1740021-VUL38G-1-MMT01--60_x50_-90DPI-NO1-Black-1-printArea-6523533.jpg
H1740033-5EFMMG-1-MMT01--80_x60_-90DPI-NO1-Black-1-printArea-8570680.jpg
H1740034-O4HXFN-1-S4321--OneSize-100DPI-NO1-Black-1-printArea-5096708.jpg
H1740036-2X4B3H-1-S5020--OneSize-100DPI-NO1-Black-1-printArea-8045830.jpg
H1740062-GKKOBN-1-MT002--60_x50_-90DPI-NO1-Black-1-printArea-8557406.jpg
H1740190-LVF7DS-1-MT002--80_x60_-90DPI-NO1-Black-1-printArea-8570132.jpg
H1850002-ITTMFZ-1-1-YG003-50_x40_-125DPI-NO1-Black-1-printArea-8574558.jpg
H1850004-WGZ924-1-YG003-60_x50_-115DPI-NO1-Black-1-printArea-8575769.jpg
H1850012-FP8TMC-1-YG003-80_x60_-120DPI-NO1-Black-1-printArea-8560097.jpg
H1850021-YPVZLG-2-MT3040-OneSize-90DPI-NO23-Black-1-printArea-7823220.jpg
H2310002-M7D5QT-1-HT001-50_x40_-90DPI-NO1-Black-1-printArea-8567431.jpg
H2310005-X2AQ6H-1-1-HT001-60_x50_-90DPI-NO1-Black-1-printArea-8574980.jpg
H2310007-8ARAOY-1-HT001-80_x60_-90DPI-NO1-Black-1-printArea-8575963.jpg

feixiang8209

回复 2# qixiaobin0715


   不行 HT001-40x30  YG003-50_x40像这样的文件名分出来把所有以这样命名的图片格式都改了，还有D8050与D8051合并成一个文件夹的功能也实现不了，烦请大神帮忙改一下，谢谢

feixiang8209

回复 6# qixiaobin0715


    谢谢大神，现在就差一个文件夹合并的功能了，非常感谢！！！

feixiang8209

回复 8# qixiaobin0715
您好大神，能否把下面的这件名再加个分类规则进去？刚才试了就这几个分不了，谢谢大神了！

    H1660001-RM9YLI-2-LT001-15inch-90DPI-NO1-White-1-printArea-8568072
H1660052-TJEHC5-5-LT001-14inch-90DPI-NO1-White-1-printArea-8564509
H1660080-RM9YLI-3-LT001-16inch-90DPI-NO1-White-1-printArea-8568071
H1660112-TJEHC5-4-LT001-17inch-90DPI-NO1-White-1-printArea-8564510
H1660162-HIO3PZ-1-ZY001--OneSize-90DPI-NO1-Black-1-printArea-8564409
还有这几个文件名格式的能否分成14inch、15inch、16inch、17inch、ZY001这样几个文件夹吗？
H1640059-ROULYY-1-ZY003-S-90DPI-NO1-White-1-printArea-8565020
H1640073-JF6TBD-1-ZY003-M-90DPI-NO1-White-1-printArea-8284474
下面这两个分成ZY003-S、ZY003-M两个文件夹

feixiang8209

回复 11# qixiaobin0715


    谢谢大神，完美解决了。谢谢！！！