#include <File.au3>
$file = "C:\Windows\WindowsUpdate.log"
$line = _FileCountLines($file)
;~ MsgBox(4096, "", $line)
Dim $aRecords
If Not _FileReadToArray($file, $aRecords) Then
MsgBox(4096, "", @error)
Exit
EndIf
For $x = 1 To $aRecords[0]
If $x <= 5000 Then
ConsoleWrite($aRecords[$x] & @CRLF)
Else
If $x >= 5000 Then ConsoleWrite($x & @CRLF)
EndIf
Next