求助批处理文本筛选找出两个文件前两列相同的行

z1366870839

假如A文本有
aaaa----aaaa
bbbb----bbbb
cccc----cccc
dddd----dddd
eeee----eeee
B文本有
aaaa----aaaa----aaaa
bbbb----bbbb----bbbb
cccc----cccc----cccc

导出C文本内有这两个文本前两段相同的到C文本
aaaa----aaaa----aaaa
bbbb----bbbb----bbbb
cccc----cccc----cccc

Batcher

1. findstr /g:"A.txt" "B.txt" > "C.txt"
   

复制代码

zaqmlp

1. @echo off
   
2. set info=互助互利,支付宝扫码头像,感谢赞助
   
3. rem 有问题,可加QQ956535081及时沟通
   
4. title %info%
   
5. cd /d "%~dp0"
   
6. set "file1=A.txt"
   
7. set "file2=B.txt"
   
8. set "file3=C.txt"
   
9. powershell -NoProfile -ExecutionPolicy bypass ^
   
10.     $dic=New-Object 'System.Collections.Generic.Dictionary[string,string]';^
    
11.     [System.Collections.ArrayList]$s=@();^
    
12.     $atxt=[IO.File]::ReadAllLines('%file1%',[Text.Encoding]::Default);^
    
13.     for($i=0;$i -lt $atxt.Count;$i++){^
    
14.         if($atxt[$i].trim() -match '^^.+?----.+?(?=----^|$)'){^
    
15.             if(-not $dic.ContainsKey($matches[0])){$dic.add($matches[0],'')};^
    
16.         };^
    
17.     };^
    
18.     $btxt=[IO.File]::ReadAllLines('%file2%',[Text.Encoding]::Default);^
    
19.     for($i=0;$i -lt $btxt.Count;$i++){^
    
20.         if($btxt[$i].trim() -match '^^.+?----.+?(?=----^|$)'){^
    
21.             if($dic.ContainsKey($matches[0])){[void]$s.add($btxt[$i])};^
    
22.         };^
    
23.     };^
    
24.     [IO.File]::WriteAllLines('%file3%', $s, [Text.Encoding]::Default);^
    
25.     write-host '%info%' -ForegroundColor green;
    
26. pause

复制代码

ivor

1. powershell "gc a.txt | %{findstr "$_" b.txt | Out-File c.txt -Append}"

复制代码

miqilaosu

回复 2# Batcher

版主大佬为什么用这个代码后第一行看不到，要怎么弄才能看到第一行

Batcher

回复 5# miqilaosu


    把你测试用的txt文件和bat文件打包压缩上传，我试试。

miqilaosu

回复 6# Batcher

我试了好多次都是少第一行，不知道为什么

Batcher

回复 7# miqilaosu


    你这个1.txt是UTF-8编码，先转换成ANSI编码再试试。