- 'vbs
- set fso=createobject("scripting.filesystemobject")
- set r=new regexp
- sstr="Array.prototype.p = Array.prototype.push;"
- estr="delete(Array.prototype.p);"
- inf="input.txt";
- otf="output.txt";
- inf=fso.OpenTextFile(inf,1,false)
- otf=fso.OpenTextFile(otf,2,true)
- r.pattern=sstr&"(.*)"&estr
- r.multiline=true
- otf.write r.execute(inf.readall)(0).submatches(0)
复制代码 或许可以吧 |