读取文本文件指定行的文本.
FileReadLine ( "文件句柄/文件名" [, 行号] )
文件句柄/文件名 | 由此前 FileOpen 函数返回的文件句柄. 也可以使用文件名字符串作为参数. |
行号 | [可选参数] 读取的行号. 文本文件的第一行为 1(不为 0), 最后一行为 -1. |
成功: | 返回指定行的文本. |
专用: | 设置 @error 为 -1, 已读到文件尾. |
失败: | 设置 @error 为 1, 文件没有以读取模式打开, 在或其它错误. |
Local $file
= FileOpen("test.txt", 0)
; 检查以只读打开的文件
If $file
= -1 Then
MsgBox(0, "错误", "无法打开文件.")
Exit
EndIf
; 读入文本行直到文件结束(EOF)
While 1
Local
$line =
FileReadLine($file)
If
@error =
-1 Then ExitLoop
MsgBox(0, "读取的行文本:
", $line)
Wend
FileClose($file)
provider with jb51.net (unicode) |