[文件操作] [已解决]批处理怎样取文件名中内容为文件夹名，并移动文件？

511182890

在这个图片，我现在需要一个批处理，放在“座套DXF”这个文件夹下，我有AA BB CC文件夹好多个，再子文件夹G1101 G1201又是好多个，我要执行的是最里面的文件AD103C-G1101-AA-118-主副背料-四向-769.dxf再取成“AA版\G1101\118\AD103C-G1101-AA-118-主副背料-四向-769.dxf”
这个118是一个数字，从”10-999“反正就是二位与三位数，118前后都是有"-"的，所以都一样，都是在第三个“-”与第四个“-”之间

511182890

回复 2# Batcher


    http://www.bathome.net/thread-36257-1-1.html

帮忙看看

511182890

回复 13# Batcher


    新问题只取第一个字母作为文件夹
  目录文件:座套DXF\AA\G1201\136\FT2032-G1202-KC五位-146-副背料-倒顺-551.dxf
我要把批处理放在“座套DXF”下，执行一下得结果为座套DXF\AA\G1201\136\F\FT2032-G1202-KC五位-146-副背料-倒顺-551.dxf
我要把批处理放在“AA”下，执行一下得结果为座套DXF\AA\G1201\136\F\FT2032-G1202-KC五位-146-副背料-倒顺-551.dxf

要二个程序。且多次执行不重复创建F文件夹

511182890

回复 13# Batcher


    谢谢，完美执行

Batcher

回复 11# 511182890

@echo off
pushd "AA版"
for /f "delims=" %%i in ('dir /b /s /a-d *.dxf') do (
    move /y "%%i" ..
)
popd
pause
复制代码

Batcher

回复 10# 511182890


    一个move命令无法实现

511182890

跟上面的图没关系
例：
座套DXF\AA\...
我要把AA目录下的文件及子目录下的所有.DXF文件移动到座套DXF
怎么实现

511182890

回复 9# Batcher


    move 能不能移动所有子目录的文件啊

跟上面的图没关系，例
我要把：座套DXF\BB\.....DXF,我要把BB及子目录下的所有。DXF文件移动到座套DXF这个文件夹中。

Batcher

回复 8# 511182890

@echo off
setlocal enabledelayedexpansion
for /d %%i in (*) do (
    pushd "%%i"
    for /d %%j in (*) do (
        for %%k in (%%j\*.dxf) do (
            for /f "tokens=4 delims=-" %%l in ("%%~nk") do (
                set NewFolder=%%l
                for /f "delims=0123456789" %%m in ("%%l") do (
                    if "%%m" neq "" (
                        set NewFolder=!NewFolder:%%m=!
                    )
                )
                if not exist "%%j\!NewFolder!\" (
                    md "%%j\!NewFolder!"
                )
                move /y "%%k" "%%j\!NewFolder!"
            )
        )
    )
    popd
)
复制代码

511182890

回复 7# Batcher


    如果我的文件：
AD103C-G1101-AA-118二边-主副背料-四向-769.dxf
AD103C-G1101-AA-118二边三边-主副背料-四向-769.dxf
执行是:
118二边\AD103C-G1101-AA-118二边-主副背料-四向-769.dxf
118二边三边\AD103C-G1101-AA-118二边三边-主副背料-四向-769.dxf

Batcher

回复 6# 511182890


    4楼代码你测试出什么问题了吗？请把测试用例发出来我试试

511182890

回复 4# Batcher


    这个代码能不能只取数字，因为不单单是“-138-”，有些是“-136二边-”或者“-138后座破开-”有中文，也有像这样的“-33-”只有二位数的

511182890

回复 4# Batcher


    在帮我优化一个程序

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1,2* delims=-" %%i in ('dir /a-d /b *.dxf') do (
set "n=%%j"
md "!n:~,5!\" 2>nul
move "%%i-%%j-%%k" "!n:~,5!\"
)
复制代码

这是之前的，我是放在”AA版“文件夹中的，取G1101字断作为文件夹名建的，现在我想让他放在“座套DXF”中。

Batcher

回复 3# 511182890

@echo off
for /d %%i in (*) do (
    pushd "%%i"
    for /d %%j in (*) do (
        for %%k in (%%j\*.dxf) do (
            for /f "tokens=4 delims=-" %%l in ("%%~nk") do (
                if not exist "%%j\%%l\" (
                    md "%%j\%%l"
                )
                move /y "%%k" "%%j\%%l"
            )
        )
    )
    popd
)
复制代码

511182890

回复 2# Batcher


    你好，执行一次是完美的，如果运行二次就是...\118\118\*.dxf了
执行三次就是...\118\118\118\*.dxf了