[问题求助] 如何用vbs或者批处理删除指定字符前的行

zinet

有a.tx内容如下：

aaaaa ok ""
bbbbb ok system
ccccc ok ok
ddddd ok okok

...................

我想用vbs或者批处理 把他整理成 b.txt 内容如下：

""
system
ok
okok

.....................

即删除第一个ok前（包括第一个ok）所有字符 只保留第一个ok后面的字符

CrLf

@echo off
for /f "delims=" %%a in (a.txt) do (
   set "str=%%a"
   setlocal enabledelayedexpansion
   echo;!str:*ok =!
   endlocal
)
pause
复制代码

Batcher

gawk "{n=index($0,\"ok\")+3;print substr($0,n)}" a.txt > b.txt
复制代码

zinet

回复 2# CrLf


    嗯：感谢了！！！！！测试成功，但一旦a.txt文件大了，用批处理处理有的费劲，期待vbs能改善速度

zinet

回复 3# Batcher


貌似不怎么成功，处理后的b.txt内容变成：
aaa ok ""
bbb ok system
ccc ok ok
ddd ok okok

还有gawk是第三方工具要下载才行，不过处理速度蛮快的

Batcher

回复 5# zinet


    我自己测试的时候没有发现问题。请把你的a.txt压缩一下传上来看看。

apang

Set fso = CreateObject("Scripting.FileSystemObject")
text = fso.OpenTextFile("a.txt",1).ReadAll
With New RegExp
   .Pattern = "(.*?ok )(.*)"
   .IgnoreCase = True
   .Global = True
   text = .Replace(text,"$2")
End With
fso.OpenTextFile("b.txt",2,True).Write text
复制代码

zinet

回复 3# Batcher


   刚才我重新下载了一个gawk  测试没问题 ，早上测试错误可能是我下错了gawk，在这里我说声抱歉.......谢谢这位大哥

czjt1234

讨厌正则

zinet

回复 7# apang


    vbs果然比批处理快多了

BAT-VBS

回复 9# czjt1234


    那你将永远学不会数据处理