#ANSI编码&cls&powershell -Version 5.1 -NoLogo -NoProfile "gc '%~0'|out-string|iex"&pause&exit
dir -Directory | %{
    $n = (dir ($_.Name + '.*'))[0]
    $f = gc -Encoding UTF8 $n | Out-String
    cd $_
    if ($f -match 'UniqueCode="(.*?)"') {
        ..\7za.exe a ..\tmp.zip ('-p' + $Matches[1]) * | Out-Null
    } else {
        ..\7za.exe a ..\tmp.zip * | Out-Null
    }
    cd ..
    $b = [System.Convert]::ToBase64String((gc .\tmp.zip -Encoding Byte -Raw))
    $utf8NoBom = New-Object System.Text.UTF8Encoding($false)
    [System.IO.File]::WriteAllText($n, ($f -replace 'Value=""', ('Value="{0}"' -f $b)), $utf8NoBom)
    rm .\tmp.zip
}
复制代码

@{}#? 2>nul&powershell -c "type -literalpath '%~f0'|out-string|iex"&exit/b

$nanaz='Z:\Program Files\7-Zip\7z.exe'
$outpath='Z:\Users\foobar\Desktop'

$p=new-object System.Diagnostics.Process
$p.StartInfo.UseShellExecute=$false
$p.StartInfo.RedirectStandardOutput=$true
$p.StartInfo.FileName=$nanaz
$pargs='a -tzip {0} -so (-_-) "{1}"'
$bf=new-object 'byte[]' (4*1024*1024)

$files=gci -file
foreach($file in $files){
$dir=$file.basename
if([io.directory]::exists($pwd.path+"\$dir")){
$coding='default'
$str=gc -LiteralPath ($file.fullname) -raw
if($str -Match 'encoding *= *"utf-?8"'){
$coding='utf8';$str=gc -LiteralPath ($file.fullname) -raw -encoding $coding
}
$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){$pw='-p'+$matches[0]}
$p.StartInfo.Arguments=$pargs -f $pw,($dir+"\*")
$p.start()
$ms=new-object 'system.io.memorystream'
$done=$false;while(-not $done){
$c=$p.StandardOutput.BaseStream.read($bf,0,$bf.length)
if($c){$ms.write($bf,0,$c)}else{$done=$true}
}
if($str -match '<..*? value="'){
$v=$matches[0]
$t=$str -split '<..*? value="',2
}else{
write-host "未找到value ,自动添加" -ForegroundColor yellow
$v='<qwertyuiop Value="'
$t=@($str,'" />')
}
$p.WaitForExit()
$ms.capacity=$ms.length
write-host ("保存到文件:"+$outpath+"\已合并_"+$file.name) -ForegroundColor green
set-content -LiteralPath ($outpath+"\已合并_"+$file.name) -encoding $coding -value @(
$t[0],$v,[convert]::ToBase64String($ms.getbuffer(),0,$ms.length),$t[1]) -nonewline
}else{
write-host "找不到文件夹: $dir" -ForegroundColor red
}}
"`ndone"
cmd /c pause
复制代码

& "c:\xxx\7za.exe" a ...
复制代码

$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){
if($Matches[0]){$pw=$matches[0];$o=$pw.Length%4
if($o){$pw=$pw+'===='.Substring(0,4-$o)}
$pwdc=[text.encoding]::utf8.getstring([convert]::FromBase64String($pw))
if($pwdc -match '\?'){
write-host "密码的编码可能不是utf8 ,将使用默认编码" -ForegroundColor yellow
$pwdc=[text.encoding]::default.getstring([convert]::FromBase64String($pw))}
$pw='-p"'+$pwdc+'"'
}}
复制代码

#ANSI编码&cls&powershell -Version 5.1 -NoLogo -NoProfile -Command "gc -Encoding Oem -ReadCount 0 -LiteralPath '%~f0'|out-string|iex"&pause&exit/b
dir -Directory | %{
    $n = (dir -File ($_.Name + '.*'))[0]
    $f = gc -Encoding UTF8 -Raw $n
    cd $_
    if ($f -match 'UniqueCode="(.*?)"') {
        $p = [System.Text.Encoding]::UTF8.GetString([System.Convert]::FromBase64String($Matches[1]))
        & "D:\7za.exe" a ..\tmp.zip ('-p' + $p) * | Out-Null
    } else {
        & "D:\7za.exe" a ..\tmp.zip * | Out-Null
    }
    cd ..
    $b = [System.Convert]::ToBase64String((gc .\tmp.zip -Encoding Byte -Raw))
    $utf8NoBom = New-Object System.Text.UTF8Encoding($false)
    [System.IO.File]::WriteAllText($n, ($f -replace 'Value=""', ('Value="{0}"' -f $b)), $utf8NoBom)
    rm .\tmp.zip
}
复制代码

$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){
if($Matches[0]){$pw=$matches[0];$o=$pw.Length%4
if($o){$pw=$pw+'===='.Substring(0,4-$o)}
$pwdc=[text.encoding]::utf8.getstring([convert]::FromBase64String($pw))
if($pwdc -match '\?'){
write-host "密码的编码可能不是utf8 ,将使用默认编码" -ForegroundColor yellow
$pwdc=[text.encoding]::default.getstring([convert]::FromBase64String($pw))}
$pwdc=[regex]::replace($pwdc,'\\+"|""+|"',[scriptblock]::create('"\"+($args[0].value.tochararray() -join "\")'))
$pw='-p"'+$pwdc+'"'
}}
复制代码