修改PowerShell代码为匹配列

娜美 · 发表于 2023-7-17 11:16:06

本帖最后由娜美于 2023-7-19 13:29 编辑

源代码
#@&cls&powershell "type %~s0|out-string|iex"&exit$a=gc -readcount 0 D:\UTF16.txt
$b=(($a[-1..-500] -match '企业 ')[0] -replace '.*简名:\s*(\S+\s*[\S:]+).*','$1'
$f=0
sc D:\out.txt $(foreach($i in $a){if(($f -eq 0) -and $i -match "简名:\s*$b"){$i;$f=1}elseif(($f -eq 1) -and $i -match '已执行'){$f=0;$i,''}elseif($f -eq 1){$i}})

复制代码

源代码是按字“企业”字段行匹配有简名字段，原来代码是匹配从简名起从左到右整个字段
现需更改为有企业字段行，从左数起匹配第7列即可

谢谢
OK THANKS idwma 哥哥
END
@Batcher sorry，由于稍作编辑时候浏览器发生混乱编码字符，已重新还原主题内容

idwma · 发表于 2023-7-17 16:50:14

#@&cls&powershell "type %~s0|out-string|iex"&exit
$a=gc -readcount 0 D:\UTF16.txt
$b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
$f=0
sc D:\out.txt $(foreach($i in $a){if(($f -eq 0) -and $i -match "简名:\S+\s$b"){$i;$f=1}elseif(($f -eq 1) -and $i -match '已执行'){$f=0;$i,''}elseif($f -eq 1){$i}})

复制代码

娜美 · 发表于 2023-7-17 17:37:01

本帖最后由娜美于 2023-7-17 23:20 编辑

回复 2# idwma

idwma哥哥, OK

idwma · 发表于 2023-7-17 18:09:37

回复 3# 娜美

测过了没有多

娜美 · 发表于 2023-7-17 18:26:45

本帖最后由娜美于 2023-7-17 18:29 编辑

回复娜美

测过了没有多
idwma 发表于 2023-7-17 18:09

反复测过

可以将例子复制粘贴多些内容试看看
idwma哥哥
发现如果将utf16.txt内容重复复制粘贴多一些会有问题

idwma · 发表于 2023-7-17 19:03:29

回复 5# 娜美

测过了是对的
你仔细看看2楼的和你现在用的有什么不同

娜美 · 发表于 2023-7-17 19:39:06

本帖最后由娜美于 2023-7-17 23:21 编辑

回复 6# idwma

反复检查过了代码和2楼一样我这测不对, 我将原文件内容复制了多次 ,, 再试试对不 ?我这怎么测都是全部输出了

idwma · 发表于 2023-7-17 19:45:29

回复 7# 娜美

顺便把代码文件也发一下

娜美 · 发表于 2023-7-17 19:51:38

本帖最后由娜美于 2023-7-17 23:22 编辑

回复娜美

顺便把代码文件也发一下
idwma 发表于 2023-7-17 19:45

#@&cls&powershell "type %~s0|out-string|iex"&exit
$a=gc -readcount 0 UTF16.txt
$b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
$f=0
sc out.txt $(foreach($i in $a){if(($f -eq 0) -and $i -match "简名:\S+\s$b"){$i;$f=1}elseif(($f -eq 1) -and $i -match '已执行'){$f=0;$i,''}elseif($f -eq 1){$i}})
start out.txt

复制代码

有一个奇怪现象, 用测试文件正确, 但是用在实际文上就不正确了 200mb左右文件

idwma · 发表于 2023-7-17 20:10:23

呃可以不猜吗，发一下这个200mb的文件

娜美 · 发表于 2023-7-17 20:31:25

本帖最后由娜美于 2023-7-17 23:22 编辑

回复 10# idwma

原文件差不多都这样的
*号是任何字符

idwma · 发表于 2023-7-17 20:47:31

复制代码

idwma · 发表于 2023-7-17 21:36:57

回复 13# 娜美

#@&cls&powershell "type %~s0|out-string|iex"&exit
$a=gc -readcount 0 D:\UTF16.txt
$b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
$f=0
sc D:\out.txt $(foreach($i in $a){if(($f -eq 0) -and $i -match "简名:\S+\s$([regex]::escape($b))"){$i;$f=1}elseif(($f -eq 1) -and $i -match '已执行'){$f=0;$i,''}elseif($f -eq 1){$i}})

复制代码

娜美 · 发表于 2023-7-17 23:19:21

回复 2# idwma

idwma 哥哥你是对的是我搞晕了 Sorry 谢谢 idwma 哥哥
END

Batcher · 发表于 2023-7-18 17:29:20

回复 1# 娜美

提醒一下，得到解决问题的方法之后，请不要把问题删掉！

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[问题求助] 修改PowerShell代码为匹配列