[文件操作] 【已解决】批处理如何把文件按指定数量移动到新的文件夹？

xzwcn

情景：A文件夹有1000个文件，B文件夹有600个文件。
执行批处理后变成：
A文件夹剩下500个文件，自动创建A2文件夹（有500个文件，来自A文件夹的）；
B文件夹剩下500个文件，自动创建B2文件夹（有100个文件）；
依此类推，子目录里的文件夹作同样的处理。

@echo off
set /p DirectoryPath=请输入或拖入源文件夹路径：
set maxFileCountPerFolder=500
::...................应该用什么命令遍历处理？......................................
pause
复制代码

xzwcn

回复 2# WHY

PS C:\Users\Administrator> $PSVersionTable

Name                           Value
----                           -----
CLRVersion                     2.0.50727.8800
BuildVersion                   6.1.7601.17514
PSVersion                      2.0
WSManStackVersion              2.0
PSCompatibleVersions           {1.0, 2.0}
SerializationVersion           1.1.0.1
PSRemotingProtocolVersion      2.1
复制代码

请问对ps的版本有要求么？我用win7自带的，执行后提示了Done，源文件夹没发生任何变化。

xzwcn

回复 4# WHY

$fdPath = 'E:\Test';   #待处理的文件夹路径
$max = 10;            #每个文件夹保留的最大文件数

forEach( $fd In (dir -Literal $fdPath -Recurse | ?{$_ -is [IO.DirectoryInfo]}) ){

    $file = [IO.Directory]::GetFiles($fd.FullName);
    if( $file.Count -lt $max ) { continue; }
    $n = 0;
    $count = $file.Count / $max;

    for( $i=1; $i -lt $count; $i++ ){
        $start = $i * $max;
        $end = ($i + 1) * $max - 1;
        $newFolder = $fd.FullName + '(' + ++$n + ')';
        while( [IO.Directory]::Exists($newFolder) ){ $newFolder = $fd.FullName + '(' + ++$n + ')'; }
        $null = md $newFolder;
        move -Literal $file[$start..$end] -Dest $newFolder;
    }
}

echo 'Done';
[Console]::ReadKey();
复制代码