[文本处理] [己解决]BAT批处理如何将文件中含有指定字符串的文件名列出来？

@echo off
for %%a in (曾孝琼 陈家江 关山月) do (
    for /f "delims=" %%b in ('findstr /im "%%a" *.txt') do echo,%%a %%b
)
pause
复制代码

@set @n=1 //&dir /b *.txt|cscript -nologo -e:jscript "%~0" &pause&exit /b
var fso = new ActiveXObject("Scripting.FileSystemObject");
var ar = new Array("曾孝琼","陈家江","关山月");
while (!WScript.StdIn.AtEndOfstream) {
    var f = WScript.StdIn.ReadLine();
    var txt = fso.OpentextFile(f).ReadAll();
    var s = "";
    for (i=0; i<=ar.length; i++) {
        if (txt.indexOf(ar[i])>-1) { s += ar[i] + " " };
    };
    if (s != "") { WScript.Echo(s + f) };
};
复制代码

@set @n=1 //&dir /b *.txt|cscript -nologo -e:jscript "%~0">KK.log &pause&exit /b
var fso = new ActiveXObject("Scripting.FileSystemObject");
var ar = new Array("曾孝琼","陈家江","关山月");
while (!WScript.StdIn.AtEndOfstream) {
    var f = WScript.StdIn.ReadLine();
    if (fso.GetFile(f).Size >0) {
        var txt = fso.OpenTextFile(f).ReadAll();
        var s = "";
        for (i in ar) {
            if (txt.indexOf(ar[i]) >-1) {s += ar[i] + " "};
        };
        if (s != "") WScript.StdOut.WriteLine(s+f);
    };
}
复制代码