@echo off
for %%1 in (data.txt)do (findstr /v  "|4| |20| |26| |70| |07|" "%%1">#
move "#" "%%1">nul 2>nul
)
复制代码

echo off &findstr /lv "|4|" data.txt>0.0
move /y 0.0 data.txt
pause&exit/b 
复制代码

echo off &find /v "|4|" data.txt|more +2>0.0
move /y 0.0 data.txt
pause&exit/b 
复制代码

echo off &findstr /lv "|4| |05| |10000|" data.txt>0.0
move /y 0.0 data.txt
pause&exit/b
复制代码

echo off & for %%k in (4 20 26 70 07) do (
   find /v "|%%k|" data.txt|more +2>0.0
   move /y 0.0 data.txt
)
pause&exit/b
复制代码

findstr /v "|[0-9][0-9]*|" data.txt > out.txt
复制代码

findstr /vg:"keywords.txt" "data.txt" > "out.txt"
复制代码

|000004|
|000020|
|000026|
复制代码

@set @x=1 /* &@echo off
type "匹配数超长字符串.txt"|cscript /e:jscript "%~f0" "data.txt"
pause&exit/b */
kwline=WSH.stdin.readall().replace('\r\n','').replace(/\|/g,'\\|');
v=WSH.arguments, fso=WSH.createObject('Scripting.FileSystemObject');
fp=fso.OpenTextFile(v(0),1), alltxt=fp.readall(), fp.close(), reg='/'+kwline+'/ig';
fp=fso.OpenTextFile(v(0),2,true), fp.write(alltxt.replace(eval(reg),'')), fp.close(), WSH.quit();
复制代码

abc*xyz
*xyz
abc*
*
123456
复制代码

abcxyz
xyz
abc
123456
复制代码

其实就是5楼代码的算法，只不过 for...() 括号里塞不进超长字符串而已，如下版本应该可以了（先借用js切碎超长字符串再回喂5楼代码，当然也可用js一锅烩 ），已用21楼示例文件测试通过...
以下代码存为 test.bat 运行，把整个匹配数超长字符串 |000004| |000020|...|605018| |605058| 存入 “匹配数超长字符串.txt” 这个单行文件，与 test.bat 和 data.txt 同目录即可... 运行结果会覆写源 data.txt，建议先备份源文件。

@set @x=1 /* &@echo off
type "匹配数超长字符串.txt"|cscript /e:jscript "%~f0">0.1
for /f "delims=" %%k in (0.1) do (
	find /v "%%k" data.txt|more +2>0.0
	move /y 0.0 data.txt
)>nul 2>nul
del/q "0.1"&pause&exit/b */
WSH.echo(WSH.stdin.readall().replace('\r\n','').replace(/ /g,'\r\n')), WSH.quit();
复制代码

@set @x=1 /* &@echo off
type "data.txt"|cscript /nologo /e:jscript "%~f0" "匹配数超长字符串.txt">0.0
move /y 0.0 data.txt >nul 2>nul
pause&exit/b */
v=WSH.arguments, fso=WSH.createObject('Scripting.FileSystemObject');
fp=fso.OpenTextFile(v(0),1), akw=fp.readall().replace(/\r\n/g,'').split(' '), fp.close();
ws=WSH.stdin, lines='';
while (!ws.atendofstream) {
    line=ws.readline();
    for (cut=0,n=0,l=akw.length; n<l; n++)
        if (line.indexOf(akw[n]) != -1) { cut=1; break; }
    if (cut==0) lines+=line+'\r\n';
}
WSH.echo(lines), WSH.quit();
复制代码

@echo off &for /f "delims=" %%a in (1.txt) do (
	findstr /lv "%%a" data.txt>0.0
	move /y 0.0 data.txt
) 2>nul
pause&exit/b
复制代码

gawk -F"[ ^|]+" "FNR==NR{if(NF){for(i=1;i<=NF;i++)if($i)A[$i]=1}next}!A[$2]" key.txt data.txt>out.txt
复制代码

type "data.txt"|cscript /nologo /e:jscript "%~f0" "1.txt">0.0
复制代码

《批处理之家》几十年不倒，虽然解答者来来去去，但总有一些无私者 助人为乐，接棒加油，让这个论坛的座右铭 ‘批处理—化繁为简，提高工作效率’ 闪闪发光。每日练练脑力操，帮人利己，能收获一点儿多巴胺和内分肽，也不错...

@echo off &(for /f "tokens=2 delims=|" %%a in (data.txt) do echo,%%a)>0.0
gawk.exe "{if(++a[$0]==1)print $0}" 0.0>_data.txt
del/q "0.0" &set/a "m=0,n=0" &for /f "delims=" %%a in (_data.txt) do (
	find /i "|%%a|" "1.txt" && set/a "m+=1" || set/a "n+=1"
)>nul 2>nul
echo,应被删除行总数=%m%，应被保留行总数=%n%
pause&exit/b
复制代码

@set @x=1 /* &@echo off
type "1.txt"|cscript /nologo /e:jscript "%~f0">0.1
for /f "delims=" %%a in (0.1) do (
	findstr /lv "%%a" data.txt>0.0
	move /y 0.0 data.txt
)>nul 2>nul
del/q "0.1" &pause&exit/b */
a=WSH.stdin.readall().split(' ');
for (n=0,l=a.length; n<l; n+=900)
     WSH.echo(a.slice(n,n+900).join(' '));
WSH.quit();
复制代码