无情浪子哥

回复 15# 1152


    如何运行，在win7

无情浪子哥

回复 16# qixiaobin0715


    目前只能运行到三级，即使三级也是容易出错的
附加：https://wwa.lanzous.com/iYMAooyyj2d
谢谢

1152

回复 17# 无情浪子哥


    这都不会运行？去找一找帮助吧。

qixiaobin0715

回复 17# 无情浪子哥
重新整理了一下，兼顾你的上一个帖子，移动并改名，可解决重名问题

@echo off
setlocal enabledelayedexpansion
for /d %%a in (*) do (
pushd %%a
for /f "delims=" %%i in ('dir /b /s /a-d') do (
    if not exist "%%a%%~nxi" (move "%%i" "%%a%%~nxi") else (
        if not exist "%%a%%~ni (2)%%~xi" (move "%%i" "%%a%%~ni (2)%%~xi") else (
            set n=2
            for %%j in ("%%a%%~ni (*)%%~xi") do (
                set "str=%%~nj"
                set "m=!str:%%a%%~ni (=!"
                set "m=!m:)=!"
                if !m! gtr !n! set /a n=m
            )
            set /a n+=1
            move "%%i" "%%a%%~ni (!n!)%%~xi"
        )
    )
)
popd
)
pause
复制代码

qixiaobin0715

只移动不改名的话，可删除楼上代码从第6行开始以下所有%%a。