zaqmlp

是删除txt里面的行内容还是实际的路径文件？

zaqmlp

@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
复制代码