[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. set info=互助互利,支付宝扫码头像,感谢赞助
  3. rem 有问题,可加QQ956535081及时沟通
  4. title %info%
  5. cd /d "%~dp0"
  6. set "f1=a.txt"
  7. set "f2=b.txt"
  8. set "f3=c.txt"
  9. powershell -NoProfile -ExecutionPolicy bypass ^
  10.     $dic=New-Object 'System.Collections.Generic.Dictionary[string,string]';^
  11.     [System.Collections.ArrayList]$s=@();^
  12.     $text1=[IO.File]::ReadAllLines('%f1%',[Text.Encoding]::UTF8);^
  13.     $text2=[IO.File]::ReadAllLines('%f2%',[Text.Encoding]::UTF8);^
  14.     for($i=0;$i -lt $text1.count;$i++){^
  15.         if(-not $dic.ContainsKey($text1[$i].toLower())){^$dic.Add($text1[$i],'');};^
  16.     };^
  17.     for($i=0;$i -lt $text2.count;$i++){^
  18.         if($dic.ContainsKey($text2[$i].toLower())){[void]$s.Add($text2[$i]);};^
  19.     };^
  20.     write-host $s.count;^
  21.     [IO.File]::WriteAllLines('%f3%', $s, [Text.Encoding]::UTF8);
  22. echo;%info%
  23. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 4# baibat

那就赞助下吧
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表