xczxczxcz

WIN7 以上系统，开启PS

gci "$Pwd\A" -Directory -Recurse -Depth 0|%{
	foreach ($Number in @($_.name.Split('_'))) {
		$err=$null
		foreach ($i in ($Number.GetEnumerator())){
			if (![Char]::IsDigit("$i")){$err='yes'}
		}
		if (!$err){$Folder=$Number}
	}
	if([Io.Directory]::Exists("$Pwd\B\$Folder")){
		Get-Item "$($_.fullname)\*"|%{
			Copy $_.Fullname -Dest "$Pwd\B\$Folder\" -Recurse -Force
			if ($?){Write-host '复制文件：'$_.Fullname -fore Magenta}
		}
	}
}
pause
复制代码

xczxczxcz

回复 4# flashercs

主系统是 WIN10 PS5.1;虚拟机也是WIN7 PS5.1；已经不知道 win7 PS2.0有哪些命令和参数了。微软也不给WIN7 WIN8的PS自动升级。
试下这个能不能在 win7 ps2.0中运行.

gci ".\A" -Attributes Directory -Recurse -Depth 0|%{
	foreach ($Number in @($_.name.Split('_'))) {
		if(($Number).GetType().Name -match 'Int32'){$Folder=$Number}
	}
	if([Io.Directory]::Exists(".\B\$Folder")){
		Get-Item "$($_.fullname)\*"|%{
			Copy $_.Fullname -Dest ".\B\$Folder\" -Recurse -Force
			if ($?){Write-host '复制文件:'$_.Fullname -fore Magenta}
		}
	}
}
复制代码

xczxczxcz

偶测试了下，3.0以上都支持。方法：鼠标右键打开 test1.ps1，选择使用powershll运行。test1.ps1与A/B文件夹放在同一目录。
如果你的电脑不能运行PS1脚本则把下面的保存为 “开启PS脚本.reg” 并导入注册表，再按上面的方法。

Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\PowerShell\1\ShellIds\Microsoft.PowerShell]
"ExecutionPolicy"="Bypass"
复制代码

=========既然升到了 4.0，为何不再升到5.0以上。
升PS的同时记得同时升级 NET.FRAMEWORK.到最新版。

xczxczxcz

如果你不想升级的话这样也行。
把第一句

gci "gci "$Pwd\A" -Directory -Recurse -Depth 0|%{
复制代码

改成

gci "$Pwd\A" -Directory|%{
复制代码

目的都是为了只读第一层文件夹。

5楼的方法也改成一样的写法，

xczxczxcz

gci ".\A" -Directory|%{
        foreach ($Number in @($_.name.Split('_'))) {
                $err=$null
                foreach ($i in ($Number.GetEnumerator())){
                        if (![Char]::IsDigit("$i")){$err='yes'}
                }
                if (!$err){$Folder=$Number}
        }
        if([Io.Directory]::Exists(".\B\$Folder")){
                Get-Item "$($_.fullname)\*"|%{
                        Copy $_.Fullname -Dest ".\B\$Folder\" -Recurse -Force
                        if ($?){Write-host '复制文件：'$_.Fullname -fore Magenta}
                }
        }
}
直接点右键选"Powershell"运行即可。在虚拟机中装了个win8.1  ps4发现木有问题。

xczxczxcz

支持文件夹名 xxxxx-xxxxx_xxx_xxxx-数字-xxxx_xxxx等，如有多段数字则以最后一段数字为文件夹。分隔线为 “-" 或"_"  把脚本和A/B文件夹放同一目录

gci "$Pwd\A" -Directory|%{
	foreach ($Number in @($_.name.Split('_-'))) {
		$err=$null
		foreach ($i in ($Number.GetEnumerator())){
			if (![Char]::IsDigit("$i")){$err='yes'}
		}
		if (!$err){$Folder=$Number}
	}
	if([Io.Directory]::Exists("$Pwd\B\$Folder")){
		Get-Item "$($_.fullname)\*"|%{
			Copy $_.Fullname -Dest "$Pwd\B\$Folder\" -Recurse -Force
			if ($?){Write-host '复制文件：'$_.Fullname -fore Magenta}
		}
	}
}
复制代码

若在命令行中运行脚本，不需要运行管理员模式，用普通用户模式即可。若运行提示没有权限，则导入下面的注册表即可。可以在脚本上点右键，然后选择在powershell 中运行。

注册表 提权  xxx.reg

Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\PowerShell\1\ShellIds\Microsoft.PowerShell]
"ExecutionPolicy"="Bypass"
复制代码

xczxczxcz

回复 17# cxy03791695766

先运行脚本 按提示操作, 文件名长度不能超过80个字符。脚本可放任意位置。若手工输入需要完整路径。

$A文件夹=Read-host -Prompt "拖入 A 文件夹 并回车"
$B文件夹=Read-host -Prompt "拖入 B 文件夹 并回车"
gci "$A文件夹" -Directory|%{
	foreach ($Number in @($_.name.Split('_-'))) {
		$err=$null
		foreach ($i in ($Number.GetEnumerator())){
			if (![Char]::IsDigit("$i")){$err='yes'}
		}
		if (!$err){$Folder=$Number}
	}
	if([Io.Directory]::Exists("$B文件夹\$Folder")){
		Get-Item "$($_.fullname)\*"|%{
			Copy $_.Fullname -Dest "$B文件夹\$Folder\" -Recurse -Force
			if ($?){Write-host '复制文件：'$_.Fullname -fore Magenta}
		}
	}
}
pause
复制代码

==============enjoy================