Проверка наличия совпадений строк 1- го файла в остальных :
Код:
#include <Array.au3>
#include <File.au3>
$sStr=''
For $i=2 To 4
$hFile = FileOpen($i & ".txt", 0)
$sStr &= FileRead ( $hFile ) & @CRLF
FileClose ( $hFile )
Next
MsgBox(0,'$sStr',$sStr)
Dim $aRecords
_FileReadToArray("1.txt",$aRecords)
_ArrayDisplay($aRecords)
For $i = 1 To UBound($aRecords)-1
If StringRegExp ( $sStr, $aRecords[$i],0)=1 Then
Msgbox(0,$aRecords[$i] ,'Совпадение найдено')
Else
Msgbox(0,$aRecords[$i] ,'Совпадение не найдено')
EndIf
Next
