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

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

本帖最后由 娜美 于 2023-7-19 13:29 编辑
  1. 源代码
  2. #@&cls&powershell "type %~s0|out-string|iex"&exit$a=gc -readcount 0 D:\UTF16.txt
  3. $b=(($a[-1..-500] -match '企业 ')[0] -replace '.*简名:\s*(\S+\s*[\S:]+).*','$1'
  4. $f=0
  5. 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,由于稍作编辑时候浏览器发生混乱编码字符,已重新还原主题内容


  1. #@&cls&powershell "type %~s0|out-string|iex"&exit
  2. $a=gc -readcount 0 D:\UTF16.txt
  3. $b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
  4. $f=0
  5. 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}})
复制代码

TOP

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

回复 2# idwma

idwma哥哥,   OK

TOP

回复 3# 娜美


    测过了没有多

TOP

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


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



   反复测过

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

TOP

回复 5# 娜美


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

TOP

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

回复 6# idwma


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

TOP

回复 7# 娜美


顺便把代码文件也发一下

TOP

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


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



  
  1. #@&cls&powershell "type %~s0|out-string|iex"&exit
  2. $a=gc -readcount 0 UTF16.txt
  3. $b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
  4. $f=0
  5. 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}})
  6. start out.txt
复制代码


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




TOP

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

TOP

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

回复 10# idwma


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

TOP

  1. 简名:\S+\s$([regex]::escape($b))
复制代码

TOP

回复 13# 娜美
  1. #@&cls&powershell "type %~s0|out-string|iex"&exit
  2. $a=gc -readcount 0 D:\UTF16.txt
  3. $b=(($a[-1..-500] -match '企业 ')[0] -split ' ')[6]
  4. $f=0
  5. 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}})
复制代码

TOP

回复 2# idwma


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

TOP

回复 1# 娜美


    提醒一下,得到解决问题的方法之后,请不要把问题删掉!
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表