pengyou86

@if(0)==(0) echo off
cscript -nologo -e:javascript %0<测试1.txt >测试结果.txt "测试2.txt"
pause&goto :eof
@end
Array.prototype.arr_ay = function(obj) {
   var i = this.length;
   while (i--) {
      if (this[i] === obj) {
        return true;
      }
   }
   return false;
}  
var arr=new ActiveXObject('Scripting.FileSystemObject').OpenTextFile(WScript.Arguments.Item(0)).readall().split('\r\n');
var re = /(\w+).*/ig;
while (!WScript.StdIn.AtEndOfStream){
    var str = WScript.StdIn.Readline();
    arr.arr_ay(str.replace(re,'$1')) ? WSH.echo(str) : WSH.echo('')
}


测试就这个好用  谢谢各位  感谢大家的帮忙

pengyou86

两个都不能使用吗
大文件个话 下面这段能否处理呢增加个临时文件 看能否提高点效率再给个 三方的
terse 发表于 2015-1-5 12:19

    谢谢你

系托

多是高手啊！我多不知道咋回事？

shelluserwlb

你这个数据很多的话完全可以放在excel中用VBA实现的
将“测试1”放到 sheet1 中分成两列（A列和B列），将"测试2"放到 sheet2 (A列)中，再运行下面的代码，结果就会出现在"sheet3"中了。

Sub a()
    Dim n1, n2 As Integer
    Dim index1, index2 As String
    Dim vlue1, vlue2 As String
    n1 = WorksheetFunction.CountA(Worksheets("sheet1").Columns(1))
    n2 = WorksheetFunction.CountA(Worksheets("sheet2").Columns(1))
    index1 = 1
    Do While index1 <= n1
        vlue1 = Worksheets("sheet1").Cells(index1, 1)
        index2 = 1
        Do While index2 <= n2
            vlue2 = Worksheets("sheet2").Cells(index2, 1)
            If vlue1 = vlue2 Then
                Worksheets("Sheet1").Cells(index1, 1).Copy _
                          Destination:=Worksheets("Sheet3").Cells(index1, 1)
                Worksheets("Sheet1").Cells(index1, 2).Copy _
                          Destination:=Worksheets("Sheet3").Cells(index1, 2)
                Exit Do
            End If
            index2 = index2 + 1
        Loop
        index1 = index1 + 1
    Loop
    MsgBox "操作成功！"
End Sub
复制代码

cjiabing

@echo off&setlocal EnableDelayedExpansion
set line=18
::设置总行数


echo;开始搜索 . . . 
cd.>搜索结果.txt
>>搜索结果.txt findstr/ng:测试2.txt 测试1.txt
>>搜索结果.txt echo %line%:


echo;开始整理 . . . 
cd.>测试结果.txt  
(
for /f "tokens=1* delims=:"  %%a in (搜索结果.txt) do if not "%%a"=="" (
    if not "!var!"=="" (set /a num=%%a-!var!-1) else set /a num=%%a-1
    if not "!num!"=="" for /l %%i in (1,1,!num!) do echo;
    echo;%%b
    set var=%%a
) else (
    set /a num=%line%-!var!-1
    for /l %%i in (1,1,!num!) do echo;
)
)>>测试结果.txt  
echo;
echo;任务结束。
echo;
pause
del 搜索结果.txt
复制代码

没试过几十万行的，估计要很久很久很久……
先搜索结果，再整理格式位置，效率可能高点——猜测而已，你可以做做试试！~
整理部分主要考虑了开头和结尾空格问题，如果不用考虑可以稍微简化条件判断if部分