qixiaobin0715

批处理也能干这事：

@echo off
setlocal enabledelayedexpansion
for /d %%a in (2\*) do (
    set /a x+=1
    set #!x!=%%a
)
for /d %%b in (1\*) do set /a y+=1
set /a n=y/x
set /a m=y%%x
if !m! neq 0 set /a n+=1
for /d %%c in (1\*) do (
    set /a k+=1
    set /a l=(k-1^)/n+1
    for %%d in (#!l!) do (
        if not exist "!%%d!\%%~nxc" (
            md "!%%d!\%%~nxc"
            xcopy "%%c\*.*" "!%%d!\%%~nxc\" /s>nul
        )
    )
)
pause
复制代码

qixiaobin0715

回复 7# 5i365
嘿嘿，ps学习中，水平不够。

qixiaobin0715

回复 8# 5i365
代码加个判断，已修改。

qixiaobin0715

我觉得是与文件名无关，应当是文件计数的问题，变量x、n为零会出现这种错误。抽空我再修改一下。

qixiaobin0715

@echo off
setlocal enabledelayedexpansion
for /d %%a in (2\*) do (
    set /a x+=1
    set #!x!=%%a
)
for /d %%b in (1\*) do (
    set /a y+=1
    set -!random!-!y!=%%b
)
set /a n=y/x
set /a m=y%%x
if !m! neq 0 set /a n+=1
for /f "tokens=2 delims==" %%c in ('set -') do (
    set /a k+=1
    set /a l=(k-1^)/n+1
    for %%d in (#!l!) do (
        if not exist "!%%d!\%%~nxc" (
            md "!%%d!\%%~nxc"
            xcopy "%%c\*.*" "!%%d!\%%~nxc\" /s>nul
        )
    )
)
pause
复制代码