中国DOS联盟

Originally posted by netbenton at 2009-4-12 12:18:
已经修改过了，你的附件我下不了，你自己测试一下吧，
贴出来的数据已经通过了测试，这次应该可以了的

@echo off&setlocal enabledelayedexpansio ... 

楼主是怎么学会正则表达式的，好奇问下

我自己是在学PYTHON 的时候学的 

Originally posted by freeants001 at 2009-4-12 23:00:
用正则表达式很容易实现,只是不知楼主究竟要保留那些内容,都搞糊涂了~~~

Originally posted by yishanju at 2009-4-13 00:07:
批处理不支持正则表达式。。。。
需要用像我说的FR 那样的第三方命令行工具。
findstr 不完全支持正则表达式。

File_Path=WScript.arguments(0);

var sss,arr="",osss="";

var fso=new ActiveXObject("scripting.filesystemobject");

var fl=fso.opentextfile(File_Path,1);sss=fl.readall();

fl=fso.opentextfile(File_Path+"_转换后.txt",2,true);

var re=/\r\nUNITED STATES OF AMERICA \(US\)\s*PATENT \(Number; Kind; Date\): United States of America \(US\)*?\r\nPATENT \(Number; Kind; Date\)\:.*|PATENT \(Number; Kind; Date\): European Patent Office \(EP\).*|PATENT \(Number; Kind; Date\): United States of America \(US\).*|PATENT \(Number; Kind; Date\): World Intellectual Property Organisation \(WO\).*|PATENT \(Number; Kind; Date\): Canada \(CA\).*|PATENT \(Number; Kind; Date\): People's Republic of China \(CN\).*|PATENT \(Number; Kind; Date\): Japan \(JP\).*|PATENT \(Number; Kind; Date\): Republic of Korea \(KR\).*|PATENT \(Number; Kind; Date\): United Kingdom \(GB\).*|PATENT \(Number; Kind; Date\): Germany \(DE\).*|PATENT \(Number; Kind; Date\): France \(FR\).*|PATENT \(Number; Kind; Date\): Russian Federation \(RU\).*\:.*/g

while ((arr=re.exec(sss))!=null)osss=osss+arr+"\r\n";

fl.write(osss);

WScript.echo("ok")

Originally posted by freeants001 at 2009-4-13 00:21:
这个不只是否符合要求

File_Path=WScript.arguments(0);

var sss,arr="",osss="";

var fso=new ActiveXObject("scripting.filesystemobject");

var fl=fso.op ...