ReadLine until end of file? Help!

[Aeterna]

I'm trying to read every line of 2 different files, and put the value of each line into 2 respective arrays. This is my guess at it, but I think its just looping forever. Any solutions?

CODE

Local $Follows[1000]

Local $Accounts[1000]

$AccountFile = "c:\accounts.txt"

$FollowFile = "c:\follows.txt"

$line = 1

While $Line > 0

$follow = fileReadLine($FollowFile, $line)

_ArrayAdd($Follows, $follow)

$account = fileReadLine($AccountFile, $line)

_ArrayAdd($Accounts, $account)

$line = $line + 1

WEnd

[enaiman]

Why not use _FileReadToArray included in "File.au3"?

This function will read your entire file to an array, every line in a separate element.

#include <File.au3>
#include <Array.au3>

Dim $Follows, $Accounts

$AccountFile = "c:\accounts.txt"
$FollowFile = "c:\follows.txt"
_FileReadToArray($FollowFile, $Follows)
_FileReadToArray($AccountFile, $Accounts)

_ArrayDisplay($Follows)
_ArrayDisplay($Accounts)

Edited April 17, 2009 by enaiman

[bo8ster]

And that sounds right.

You set $line to = 1 before the loop which is good and then increment $line each iteration of the loop, thus $line is always going to be > 0.

You will want to check when you are and the end of the file. Check @error for that condition - the help file explains it and gives an example.

[Aeterna]

thanks, solved

got another question gonna be posting it in a new thread.