Help with reading a file

[Shade]

I was wondering if anyone knew how to read the last line in a file and the second to last, in case the last one is a CR. Your help is appreciated.

[smstroble]

try this

#Include <file.au3>
$path = "C:\whatever.txt"
$file = 0
_FileReadToArray($path , $file) ;loads all lines into $file with $file[0] = number of lines
$lastline = $file[$file[0]-1] ;$file[number of line -1]
$secondtolastline = $file[$file[0]-2] ;$file[number of line -2]
MsgBox(0, "", $lastline $ @CRLF & $secondtolastline)

Edited February 1, 2007 by smstroble

[Shevilie]

$file = FileOpen("test.txt", 0)

$2ndlast = ""
$last = ""

; Check if file opened for reading OK
If $file = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
EndIf

; Read in lines of text until the EOF is reached
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    $last = $line
    $2ndlast = $last
Wend

FileClose($file)

MsgBox(0,0,"Last line: " & $last & "; 2nd Last: " & $2ndlast)

[Shade]

Thanks for the quick replies! I finally solved my problem.

[Shevilie]

Actually found a bug in my script

$file = FileOpen("test.txt", 0)

$2ndlast = ""
$last = ""

; Check if file opened for reading OK
If $file = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
EndIf

; Read in lines of text until the EOF is reached
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    ;Need to switch the below as they are now
    $2ndlast = $last
    $last = $line
Wend

FileClose($file)

MsgBox(0,0,"Last line: " & $last & "; 2nd Last: " & $2ndlast)

Edited February 1, 2007 by Shevilie