filereadline问题

moonboor

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

If $file = -1 Then
    MsgBox(0, "错误", "不能打开文件.")
    Exit
EndIf


While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    MsgBox(0, "读取的行:", $line)
Wend

FileClose($file)

当前文件夹里有一个config.txt的文件。而且里面也有数据。但是就是读取不出来。请各位帮我看一看这是什么问题。

lpxx

就把config.txt文件里写上以下代码读读看

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

If $file = -1 Then
    MsgBox(0, "错误", "不能打开文件.")
    Exit
EndIf


While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    MsgBox(0, "读取的行:", $line)
Wend

FileClose($file)

moonboor

这样也是不行的。提示“不能打开文件”

kn007

我这里很正常，如果config.txt是空的，将会退出不提示什么，如果有一行字，他就会显示，，，


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

If $file = -1 Then
    MsgBox(0, "错误", "不能打开文件.")
    Exit
EndIf


While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    MsgBox(0, "读取的行:", $line)
Wend

FileClose($file)

水木子

测试过楼主的代码，没问题，可以正常读取。

config.txt文件需和脚步一目录。

sunafter

文件确保在脚本目录下