[已解决]BAT查找没有处理过的文件，进行插入一行，替换引号为换行符，删除指定行

terse

回复 25# idctop
重新整理一下代码

1. @if(0)==(0) echo off
   
2. set str="code,name,description,market,suggestion,closing_price,price,exchange rate,price earnings ratio,the main cost,institutional participation"
   
3. for /f "delims=" %%i in ('dir /b *.txt ^| cscript -nologo -e:jscript %0 %str%') do (
   
4.    rem 这里是要处理文件
   
5.    echo %%i
   
6. )
   
7. pause & exit
   
8. @end
   
9. var fso = new ActiveXObject("Scripting.FileSystemObject");
   
10. var s = WScript.Arguments.Item(0);
    
11. var r = /^.+?(\d{4}(-\d{2}){2})(((\s|-)(\d{2})){2})?.+$/;
    
12. var re = new RegExp("^" + s, "i");
    
13. var reg = /.*\[标签:内容\].*/g;
    
14. var fso = new ActiveXObject("Scripting.FileSystemObject");
    
15. while (!WScript.StdIn.AtEndOfStream){
    
16.     var filename = WScript.StdIn.Readline();
    
17.     var str = filename.replace(
    
18.              r,
    
19.              function(a,b,c,d) {return(b + d.replace(/-/,':').replace(/\s+/,',') + ',' );
    
20.              }
    
21.         )
    
22.    
    
23.     var text = adoLoadText(filename, 'UTF-8').replace(/\r?\n/ig,'');
    
24.     while (!(re.test(text))){
    
25.        text = s + "\r\n" + text.replace(/&sbquo/ig,',').replace(/","/g,'\r\n' + str).replace(reg,'');
    
26.        TextToFile(text, filename);
    
27.        WSH.Echo(filename)
    
28.     }
    
29. }
    
30. 
    
31. function adoLoadText(filename, charset) {
    
32.     var fs, text;
    
33.     fs = new ActiveXObject("ADODB.Stream");
    
34.     fs.type = 2;
    
35.     fs.charset = charset;
    
36.     fs.open();
    
37.     fs.loadFromFile(filename);
    
38.     text = fs.readText(-1);
    
39.     fs.close();
    
40.     return text;
    
41. }
    
42. 
    
43. function TextToFile(text, filename) {
    
44.     var fs = new ActiveXObject("Adodb.Stream");
    
45.     fs.Charset = 'UTF-8';
    
46.     fs.Open();
    
47.     fs.WriteText(text);
    
48.     fs.SaveToFile(filename, 2);
    
49.     fs.Close();
    
50. }

复制代码