批处理如何在TXT文件里怎样有条件的合并行？

andersen12

原文
姓名  日期       打卡时间
员工1 2011-10-25 08:54
员工2 2011-10-25 08:17
员工3 2011-10-26 08:10
员工1 2011-10-25 17:35
员工2 2011-10-26 17:14
员工3 2011-10-25 17:34
员工1 2011-11-25 08:54
员工2 2011-11-25 08:17
员工3 2011-11-26 08:10
员工1 2011-11-25 17:35
员工2 2011-11-26 17:14
员工3 2011-11-25 17:34

要求合并后的效果

姓名  日期     上班时间  下班时间
员工1 2011-10-25 08:54          17:35
员工2 2011-10-25 08:17   17:14
员工3 2011-10-26 08:10   17:34
员工1 2011-11-25 08:54   17:35
员工2 2011-11-25 08:17   17:14
员工3 2011-11-26 08:10   17:34

powerbat

楼主这个好像是从Excel或数据库中导出来的？其实用原生方法更简单，为什么要变成文本？

1. 
   
2. @set @n=0//&cscript.exe -e:jscript "%~f0"&exit /b
   
3. 
   
4. file = "考勤.txt";
   
5. 
   
6. fso = new ActiveXObject("Scripting.FileSystemObject");
   
7. s = fso.OpenTextFile(file).ReadAll();
   
8. s = s.replace(/^\s+|\s*\n\s*/g,'\r\n').replace(/ +/g,',');
   
9. temp = '#'+file;
   
10. ts = fso.OpenTextFile(temp, 2, true);
    
11. ts.write(s); ts.close();
    
12. 
    
13. strConnect = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.;'
    
14.     + 'Extended Properties="text;HDR=yes;FMT=Delimited;";';
    
15. AdoCnn = new ActiveXObject("ADODB.Connection");
    
16. AdoCnn.ConnectionString = strConnect;
    
17. AdoCnn.Open();
    
18. s = "姓名,日期,上班时间,下班时间\r\n";
    
19. AdoRs = new ActiveXObject("ADODB.Recordset");
    
20. AdoRs.Open("SELECT [a.姓名],[a.日期],[a.打卡时间],[b.打卡时间] from ["+temp+"] as a inner join ["+temp+"] as b  ON (a.[姓名]=b.[姓名] AND a.[日期]=b.[日期] AND a.[打卡时间]<b.[打卡时间])", AdoCnn, 3);
    
21. s += AdoRs.GetString(2, AdoRs.RecordCount, ",", "\r\n");
    
22. fso.OpenTextFile('result.csv', 2, true).write(s);
    
23. AdoRs.Close();
    
24. AdoCnn.Close();
    
25. fso.DeleteFile(temp);
    

复制代码

andersen12

非常感谢2楼的回答！其实原文数据我是从考勤机里导出来的，已经做过一些处理了。我刚开始学编程，对于2楼回复的代码还是不能完全理解，我会继续努力向2楼学习，再次感谢！