ReadLine...

[Skuller74]

Hey, I'm new at AutoIt... so I havn't made anything special, so I'm just experimenting with easy things.

So... when I execute this script, it outputs Failure... why?

;Open file
$file = FileOpen("lines.txt", 2)

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

; Write lines to file
FileWriteLine($file, "Line1")
FileWriteLine($file, "Line2" & @CRLF)
FileWriteLine($file, "Line3")

; Read line
$text = FileReadLine($file, 3)

; Check if text is there
If $text = "Line3" Then
    MsgBox(0, "Success", "Success! Line reads 'Line3'")
Else
    MsgBox(0, "Failure", "Failure... Line does not read 'Line3'")
EndIf

FileClose($file)

[LxP]

Possibly because you are attempting to open a file twice -- you need to close it before opening it under a new mode.

[Skuller74]

ah cool thanks ^^

so it should look like this...

$file = FileOpen("lines.txt", 2)

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

FileWriteLine($file, "Line1")
FileWriteLine($file, "Line2" & @CRLF)
FileWriteLine($file, "Line3")

; Closes file
FileClose($file)

; Reopens file
FileOpen("lines.txt", 0)

$text = FileReadLine($file, 3)

If $text = "Line3" Then
    MsgBox(0, "Success", "Success! Line reads 'Line3'")
Else
    MsgBox(0, "Failure", "Failure... Line does not read 'Line3'")
EndIf

FileClose($file)

It works... thanks

[herewasplato]

It works... thanks

Glad that LxP could help... but why this:

; Write lines to file

FileWriteLine($file, "Line1")

FileWriteLine($file, "Line2" & @CRLF)

FileWriteLine($file, "Line3")

why not just:

; Write lines to file

FileWriteLine($file, "Line1")

FileWriteLine($file, "Line2")

FileWriteLine($file, "Line3")

just askin'