[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 WHY 于 2020-12-8 10:30 编辑

1.提取 a.txt 文本 Write-Output "之间的字符"到 b.txt
  1. $arr = (gc a.txt -ReadCount 0) -match 'Write-Output +"(?>[^"]+)"' | forEach {$_.Split('"')[1]};
  2. sc b.txt -Value $arr;
复制代码
2.文本 b.txt 翻译后保存到 c.txt
3.文本 c.txt 替换 a.txt 对应文字,写入 d.txt
  1. $global:n = 0;
  2. $arr = (gc c.txt -ReadCount 0) -notmatch '^\s*$';
  3. $str = (gc a.txt -ReadCount 0) -join "`r`n";
  4. $str = [regex]::Replace($str, '(?<=(?i)Write-Output +")(?>[^"]+)(?=")', {$arr[$global:n++]});
  5. sc d.txt -Value $str;
复制代码
1

评分人数

    • smss: 感激涕零技术 + 1

TOP

返回列表