[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. <# :
  2. cls
  3. @echo off
  4. cd /d "%~dp0"
  5. powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::Default))) -Args '%~dp0'"
  6. pause
  7. exit
  8. #>
  9. $path=$args[0].trimend('\');
  10. $file1=$path+'\a.txt';
  11. $file2=$path+'\tmp.txt';
  12. $file3=$path+'\b.txt';
  13. if(-not (test-path -liter $file1)){Write-host ('"'+$file1+'" not found');exit;};
  14. if(-not (test-path -liter $file2)){Write-host ('"'+$file2+'" not found');exit;};
  15. $arr=New-Object -TypeName System.Collections.ArrayList;
  16. $enc=$Utf8NoBom=New-Object System.Text.UTF8Encoding $False;
  17. $text1=[IO.File]::ReadAllLines($file1, $enc);
  18. for($i=0;$i -lt $text1.count;$i++){
  19.     $brr=$text1[$i] -split '[\t]+'
  20.     [void]$arr.add($brr);
  21. };
  22. $fs=New-Object System.IO.FileStream($file3, [System.IO.FileMode]::Create);
  23. $sw=New-Object System.IO.StreamWriter($fs, $enc);
  24. $text2=[IO.File]::ReadAllLines($file2, $enc);
  25. for($i=0;$i -lt $text2.count;$i++){
  26.     for($j=0;$j -lt $arr.count;$j++){
  27.         $n=0;
  28.         for($k=0;$k -lt $arr[$j].count;$k++){
  29.             if($text2[$i].contains($arr[$j][$k])){$n++};
  30.         };
  31.         if($n -eq $arr[$j].count){
  32.             $tmpline=($arr[$j] -join '\')+"`t"+$text2[$i];
  33.             $sw.WriteLine($tmpline);
  34.             $sw.Flush();
  35.             break;
  36.         };
  37.     };
  38. };
  39. $sw.Close();
  40. $fs.Close();
复制代码
1

评分人数

提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表