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"
复制代码

cxy03791695766

回复 15# xczxczxcz


    厉害，膜拜大神！

厚着脸再问一下，可否有办法让我手动填写AB的路径，然后再执行复制命令。

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================

cxy03791695766

回复 18# xczxczxcz


    完美！太感谢了！