PowerShell有条件地给某个文件夹中所有子文件夹分配指定数量的文件夹

5i365 · 发表于 2022-1-6 19:14:41

本帖最后由 5i365 于 2022-1-7 09:23 编辑

有两个主文件夹A和B, 要把A中的子文件夹分配【移动】到B的子文件夹中,
在分配到B下的每个子文件夹中之前, 要先检查该子文件夹的情况: 当其下只有1个OK文件夹, 才分配,【有文件不受影响】
A文件夹中的子文件夹名字如下
1 中
2 国
11 美
12 国
22 人
101 日
102 本
按子文件夹名字前的数字先后顺序分配【参考代码 Get-ChildItem “.\A”-Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { $_.FullName }】, 分配2个子文件夹到B下的符合上面要求的子文件夹中
分配中可能遇到的情况:
A下的子文件夹分完了: 则回显文件夹已经分完
A下的文件夹数量是奇数, 这样在给B下的某子文件夹分配过去时, 就只能分配一个过去了，此时不报错
可能因为A下没有足够的子文件夹，B下有些符合要求的子文件夹，仍然分不到文件夹，此时不报错

测试文件夹示例：
https://wss1.cn/f/7ar6432xz4e 复制链接到浏览器打开

5i365 · 发表于 2022-1-7 13:45:05

感觉这个示例太综合了，考查的点有多

qixiaobin0715 · 发表于 2022-1-10 12:35:35

本帖最后由 qixiaobin0715 于 2022-1-10 12:40 编辑

回复 1# 5i365
这个用批处理应当也能解决。
但没有理解第一种情况的意思。
感觉第一种情况应当包含第2、3中情况。

5i365 · 发表于 2022-1-10 13:37:12

本帖最后由 5i365 于 2022-1-10 13:41 编辑

回复 3# qixiaobin0715

感谢指正，上面描述有点笼统，第一种情况有包含第2、3中的情况。

pwershell跨平台真是牛X了，一份代码两个系统运行，确实不错

貌似，只限字符中串和文件处理之类的代码，有些win专用的代码还是不能跨平台的

我用的一个音乐软件，在win和mac都能安装，刚用苹果系统，不太熟悉，所以考虑用ps，一举多得

idwma · 发表于 2022-1-10 17:59:20

本帖最后由 idwma 于 2022-1-10 18:14 编辑

Get-ChildItem “.\A”-Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a+=$_.FullName }
dir .\b|?{$_.PSIsContainer}|%{if(test-path $_.fullname\ok){copy $a[$i++] $_.fullname -rec; copy $a[$i++] $_.fullname -rec}}
if($a[$i] -eq $null){"分完"}

复制代码

5i365 · 发表于 2022-1-10 18:42:56

回复 5# idwma

  Test-Path : A positional parameter cannot be found that accepts argument '\ok'.
At line:2 char:34
+ dir .\b|?{$_.PSIsContainer}|%{if(test-path $_.fullname\ok){copy $a[$i ...
+                               ~~~~~~~~~~~~~~~~~~~~~~~~
+ CategoryInfo       : InvalidArgument: (

[Test-Path], ParameterBindingException
+ FullyQualifiedErrorId : PositionalParameterNotFound,Microsoft.PowerShell.Commands.TestPathCommand

Test-Path : A positional parameter cannot be found that accepts argument '\ok'.
At line:2 char:34
+ dir .\b|?{$_.PSIsContainer}|%{if(test-path $_.fullname\ok){copy $a[$i ...
+                               ~~~~~~~~~~~~~~~~~~~~~~~~
+ CategoryInfo       : InvalidArgument: (:) [Test-Path], ParameterBindingException
+ FullyQualifiedErrorId : PositionalParameterNotFound,Microsoft.PowerShell.Commands.TestPathCommand

Test-Path : A positional parameter cannot be found that accepts argument '\ok'.
At line:2 char:34
+ dir .\b|?{$_.PSIsContainer}|%{if(test-path $_.fullname\ok){copy $a[$i ...
+                               ~~~~~~~~~~~~~~~~~~~~~~~~
+ CategoryInfo       : InvalidArgument: (:) [Test-Path], ParameterBindingException
+ FullyQualifiedErrorId : PositionalParameterNotFound,Microsoft.PowerShell.Commands.TestPathCommand

Index operation failed; the array index evaluated to null.
At line:3 char:4
+ if($a[$i] -eq $null){"分完"}
+ ~~~~~~~~~~~~~~~~
+ CategoryInfo       : InvalidOperation: (:) [], RuntimeException
+ FullyQualifiedErrorId : NullArrayIndex

请按任意键继续. . .

idwma · 发表于 2022-1-10 18:57:43

回复 6# 5i365

忘了ok路径字符拼接没处理

test-path "$($_.fullname+'\ok')"

复制代码

5i365 · 发表于 2022-1-10 20:02:43

回复 7# idwma

遇到两个情况:
1.我把copy改成了move 就报错了
2.从哪里可以设置每次分配的文件夹的数量, 例如,从A文件夹每次移动N个子文件夹到B下的某个符合要求的子文件夹中, 现在是每次移动两个

#&cls&@powershell -c "Get-Content '%~0' | Select-Object -Skip 1 | Out-String | Invoke-Expression" &pause&exit
Get-ChildItem ".\A" -Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a+=$_.FullName }
dir .\b|?{$_.PSIsContainer}|%{if(test-path "$($_.fullname+'\ok')"){move $a[$i++] $_.fullname -rec; move $a[$i++] $_.fullname -rec}}
if($a[$i] -eq $null){"分完"}

idwma · 发表于 2022-1-10 20:24:26

回复 8# 5i365

#&cls&@powershell -c "Get-Content '%~0' | Select-Object -Skip 1 | Out-String | Invoke-Expression" &pause&exit
$k=2
Get-ChildItem ".\A" -Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a+=$_.FullName }
dir .\b|?{$_.PSIsContainer}|%{if(test-path "$($_.fullname+'\ok')"){while($j++ -le $k){move $a[$i++] $_.fullname}}
if($a[$i] -eq $null){"分完"}

复制代码

5i365 · 发表于 2022-1-10 21:12:20

回复 9# idwma

Invoke-Expression : At line:3 char:30
+ dir .\b|?{$_.PSIsContainer}|%{if(test-path "$($_.fullname+'\ok')"){wh ...
+                            ~
Missing closing '}' in statement block or type definition.
At line:1 char:98
+ ... 歌曲文件夹 2.bat' | Select-Object -Skip 1 | Out-String | Invoke-Expression
+                                                       ~~~~~~~~~~~~~~~~~
+ CategoryInfo       : ParserError: (

[Invoke-Expression], ParseException
+ FullyQualifiedErrorId : MissingEndCurlyBrace,Microsoft.PowerShell.Commands.InvokeExpressionCommand

请按任意键继续. . .

5i365 · 发表于 2022-1-10 21:15:39

回复 9# idwma

好像丢} 了,改成下面能执行了,但是B下的第一个子文件夹分配了, 其它的没有分配

#&cls&@powershell -c "Get-Content '%~0' | Select-Object -Skip 1 | Out-String | Invoke-Expression" &pause&exit
$k = 2
Get-ChildItem ".\A" -Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a += $_.FullName }
dir .\b | ?{ $_.PSIsContainer } | %{
if (test-path "$($_.fullname + '\ok')") { while ($j++ -le $k) { move $a[$i++] $_.fullname } }
if ($a[$i] -eq $null) { "分完" }
}

复制代码

idwma · 发表于 2022-1-10 22:21:36

回复 11# 5i365

#&cls&@powershell -c "Get-Content '%~0' | Select-Object -Skip 1 | Out-String | Invoke-Expression" &pause&exit
$k = 2
Get-ChildItem ".\A" -Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a += $_.FullName }
dir .\b | ?{ $_.PSIsContainer } | %{
if (test-path "$($_.fullname + '\ok')") { while ($j++ -le $k) { move $a[$i++] $_.fullname } }
$j=$null
if ($a[$i] -eq $null) { "分完" }
}

复制代码

5i365 · 发表于 2022-1-11 08:17:17

回复 12# idwma

刚看到, 现在双击批处理后, 成功移动了文件夹, 但是会报下面的错, 另外, $k=2 每次移动的文件夹数量却是3

Move-Item : Cannot bind argument to parameter 'Path' because it is null.
At line:4 char:71
+ ... ($_.fullname + '\ok')") { while ($j++ -le $k) { move $a[$i++] $_.full ...
+ ~~~~~~~~
+ CategoryInfo : InvalidData: (

[Move-Item], ParameterBindingValidationException
+ FullyQualifiedErrorId : ParameterArgumentValidationErrorNullNotAllowed,Microsoft.PowerShell.Commands.MoveItemCom
mand

Move-Item : Cannot bind argument to parameter 'Path' because it is null.
At line:4 char:71
+ ... ($_.fullname + '\ok')") { while ($j++ -le $k) { move $a[$i++] $_.full ...
+ ~~~~~~~~
+ CategoryInfo : InvalidData: (:) [Move-Item], ParameterBindingValidationException
+ FullyQualifiedErrorId : ParameterArgumentValidationErrorNullNotAllowed,Microsoft.PowerShell.Commands.MoveItemCom
mand

分完
请按任意键继续. . .

qixiaobin0715 · 发表于 2022-1-11 09:08:08

回复 1# 5i365
来个纯批的吧：

@echo off
set n=10000
setlocal enabledelayedexpansion
for /f "tokens=1*" %%i in ('dir /b /ad A') do (
set /a n+=%%i
set "_!n!=%%i %%j"
set n=10000
)
for /f "delims=" %%k in ('dir /b /ad B') do (
if exist "B\%%k\ok" (
pushd "B\%%k"
dir /b /ad|find /v "ok">nul||(
set /a m+=1
set "#!m!=B\%%k"
)
popd
)
)
for /f "tokens=1* delims==" %%a in ('set _') do (
set str=%%b
set /a x+=1
set /a "y=(x+1)/2"
for /f "delims=" %%c in ("#!y!") do if exist "!%%c!" move "A\%%b" "!%%c!"
)>nul
if not exist "A\!str!" echo,文件夹已经分完！！！
pause

复制代码

idwma · 发表于 2022-1-11 14:43:21

回复 13# 5i365

#&cls&@powershell -c "Get-Content '%~0' | Select-Object -Skip 1 | Out-String | Invoke-Expression" &pause&exit
$k = 2
Get-ChildItem ".\A" -Directory | Sort-Object { [int]($_.Name -split '\s+')[0] } | foreach-Object { [array]$a += $_.FullName }
dir .\b | ?{ $_.PSIsContainer } | %{
if (test-path "$($_.fullname + '\ok')") { while ($j++ -lt $k) { if ($a[$i] -ne $null){move $a[$i++] $_.fullname} } }
$j=$null
}
if ($a[++$i] -eq $null) { "分完" }

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[问题求助] PowerShell有条件地给某个文件夹中所有子文件夹分配指定数量的文件夹

评分

浏览过的版块