本帖最后由 zaqmlp 于 2019-5-19 08:37 编辑
- @echo off
- mode con lines=500
- set info=互助互利,支付宝扫码头像,感谢赞助
- rem 有问题,可加QQ956535081及时沟通
- title %info%
- cd /d "%~dp0"
- set "文本1=name.txt"
- set "文本2=lujing.txt"
- powershell -NoProfile -ExecutionPolicy bypass ^
- $accurate=$true;$extension=$false;^
- $t1=[IO.File]::ReadAllLines('%文本1%',[Text.Encoding]::Default);^
- $t2=[IO.File]::ReadAllLines('%文本2%',[Text.Encoding]::Default);^
- [System.Collections.ArrayList]$list=@();^
- for($i=0;$i -lt $t1.Count;$i++){^
- for($j=0;$j -lt $t2.Count;$j++){^
- $line=$t2[$j].trim('\""');^
- $arr=$line.split('\');$name='';^
- if($extension){$name=$arr[-1];}else{$name=$arr[-1] -replace '\.[^^\.]*$','';};^
- if($accurate){^
- if($t1[$i] -eq $name){[void]$list.add($line)};^
- }else{^
- if($name.toLower().Contains($t1[$i].toLower())){[void]$list.add($line)};^
- };^
- };^
- };^
- $list;^
- write-host '%info%' -ForegroundColor green;^
- write-host \"`r`n>>按回车键执行删除<<\";^
- [Console]::ReadKey()^|Out-Null;^
- for($i=0;$i -lt $list.Count;$i++){^
- if(test-path -liter $list[$i]){^
- write-host ('--^>'+$list[$i]);^
- del -liter $list[$i] -force;^
- };^
- }
- pause
复制代码
|