Difficulty on Fileread

[Syed23]

Hi All,

Sorry for bringing the same topic.. i am facing one difficulty on reading the entire file. i have a text file which contains 90 lines i want to read it by line by line but i am failing to do that? could some one suggest me how to do that.. i have a example below which taken from help file.

#include <File.au3>
Global $log = @DesktopDir&"CSS 3096.log"
Global $sFilePath1 = @DesktopDir&"3096.txt"
_FileWriteLog($log,"INFO>User>"[email="&@UserName"]&@UserName[/email])
_FileWriteLog($log,"INFO>Machine>"[email="&@ComputerName"]&@ComputerName[/email])
_FileWriteLog($log,"INFO>OS Type>"[email="&@OSType"]&@OSType[/email]&" -(Arch) - "[email="&@OSArch"]&@OSArch[/email])
_FileWriteLog($log,"INFO>"&"Starting the process...")
$file = FileOpen($sFilePath1, 0)
while 1
    $line = FileReadLine($sFilePath1, $i)
    If @error = -1 Then ExitLoop
    MsgBox(0, "Line read:", $line)
Wend
FileClose($sFilePath1)

Edited : Removed the unwanted header file #include<Excel.au3>

Edited December 27, 2011 by Syed23

[BrewManNH]

Try changing this line:

; From this
Global $sFilePath1 = @DesktopDir&"3096.txt"
; to this
Global $sFilePath1 = FileOpen(@DesktopDir & "3096.txt")

[jchd]

I don't know which file you want to read (cf. previous post above) but anyway, make it:

#include <File.au3>
Global $log = @DesktopDir&"CSS 3096.log"
Global $sFilePath1 = @DesktopDir&"3096.txt"
_FileWriteLog($log,"INFO>User>"[email="&@UserName"]&@UserName[/email])
_FileWriteLog($log,"INFO>Machine>"[email="&@ComputerName"]&@ComputerName[/email])
_FileWriteLog($log,"INFO>OS Type>"[email="&@OSType"]&@OSType[/email]&" -(Arch) - "[email="&@OSArch"]&@OSArch[/email])
_FileWriteLog($log,"INFO>"&"Starting the process...")
$file = FileOpen($sFilePath1, 0)
while 1
    $line = FileReadLine($File)
    If @error = -1 Then ExitLoop
    MsgBox(0, "Line read:", $line)
Wend
FileClose($File)

As mentionned in help about File* functions, don't mix file access using filemane and handles!

[kylomas]

syed,

Your origional problemwas that you were specifying a variable "$i" for the line number parm of filereadline, however, the variable was never incremented. Using jchd's example works because, as the help file says, if no line number is specifyed the "next" line is read....

Good Luck,

kylomas

[Syed23]

Hi All,

Thanks for all your suggestion. with help of your suggestion i have changed my script and whic works as expected. Thanks a lot for all! here is my changed script.

#include <File.au3>
Global $log = @DesktopDir&"CSS 3096.log"
Global $sFilePath1 = @DesktopDir&"3096.txt"
_FileWriteLog($log,"INFO>User>"[email="&@UserName"]&@UserName[/email])
_FileWriteLog($log,"INFO>Machine>"[email="&@ComputerName"]&@ComputerName[/email])
_FileWriteLog($log,"INFO>OS Type>"[email="&@OSType"]&@OSType[/email]&" -(Arch) - "[email="&@OSArch"]&@OSArch[/email])
_FileWriteLog($log,"INFO>"&"Starting the process...")
$file = FileOpen($sFilePath1, 0)
while 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    MsgBox(0, "Line read:", $line)
Wend
FileClose($sFilePath1)

Edited December 28, 2011 by Syed23