bat批量替换运行速度太慢，求大佬优化一下，微信20元

星尘

具体报酬：20元人民币
支付方式：微信支付宝。
联系方式：qq：874380156
有效期限：第一个测试成功。
这是我之前的帖子http://www.bathome.net/thread-56246-1-1.html
但处理速度太慢的，每次可能要处理几十万的文本文件，求优化，提高速度，代码如下

1. <＃：
   
2. cls
   
3. @回声关闭
   
4. cd / d“％&#12316;dp0”
   
5. powershell -NoProfile -ExecutionPolicy绕过“ Invoke-Command -ScriptBlock（[ScriptBlock] :: Create（[IO.File] :: ReadAllText（'％&#12316;f0'，[Text.Encoding] :: Default）））-Args'％ &#12316;dp0'“
   
6. 暂停
   
7. 出口
   
8. ＃>
   
9. $ path = $ args [0];
   
10. 
    
11. $ list = @ {
    
12.     'www.123.com'= @ {'原字符1'='新字符1';'原字符2'='新字符2'};
    
13.     'www.456.com'= @ {'原字符1'='新字符1';'原字符2'='新字符2'};
    
14.     'www.789.com'= @ {'原字符1'='新字符1';'原字符2'='新字符2'}
    
15. };
    
16. 
    
17. 函数checkencoding（$ t）{
    
18.     $ tmpenc =新对象System.Text.UTF8Encoding $ False;
    
19.     $ m = [regex] :: match（$ t，'（？i）<meta。*？charset = [“'']？（gbk | gb2312）'）;;
    
20.     if（$ m.Success）{$ tmpenc = [Text.Encoding] :: Default;};
    
21.     返回$ tmpenc;
    
22. };
    
23. 
    
24. foreach（$ list.keys中的$ k）{
    
25.     $ folder = $ path + $ k;
    
26.     if（test-path -liter $ folder）{
    
27.         $ files = @（dir -liter $ folder -recurse |？{（@（'。html'）-包含$ _。Extension）-和（$ _ -is [System.IO.FileInfo]）}））;
    
28.         for（$ i = 0; $ i -lt $ files.length; $ i ++）{
    
29.             写主机$ files [$ i] .FullName;
    
30.             $ enc =新对象System.Text.UTF8Encoding $ False;
    
31.             $ tmptext = [IO.File] :: ReadAllText（$ files [$ i] .FullName，$ enc）;
    
32.             $ enc =检查编码$ tmptext;
    
33.             $ oldtext = [IO.File] :: ReadAllText（$ files [$ i] .FullName，$ enc）;
    
34.             foreach（$ list [$ k] .keys中的$ j）{
    
35.                 $ oldtext = $ oldtext.replace（$ j，$ list [$ k] [$ j]）;
    
36.             };
    
37.             [IO.File] :: WriteAllText（$ files [$ i] .FullName，$ oldtext，$ enc）;
    
38.         };
    
39.     };
    
40. }

复制代码