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

flashercs

回复 3# xczxczxcz


win7 的ps2.0,没有$pwd ,没有gci -Directory参数

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

flashercs

@echo off
for /d %%a in ("A\1001_???") do copy /y "%%a\*.*" "B\1001\"
for /d %%a in ("A\2002_???") do copy /y "%%a\*.*" "B\2002\"
for /d %%a in ("A\???_3003") do copy /y "%%a\*.*" "B\3003\"
pause
复制代码