ailuzhen 发表于 2014-12-22 02:35:11

filereadline

$file = FileOpen("test.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)

我想判断text.txt文本里面有等于778899的行，就执行a.exe该怎么写呢

netegg 发表于 2014-12-22 08:05:32

本帖最后由 netegg 于 2014-12-22 08:20 编辑

$i =1
While not ($i>_filecountlines($file))
    $line = FileReadLine($file, $i)
    If @error = -1 Then ExitLoop
    if $line='778899' then run('a.exe')
    $i += 1
    ;MsgBox(0, "读取的行:", $line)
Wend

netegg 发表于 2014-12-22 08:18:08

本帖最后由 netegg 于 2014-12-22 08:21 编辑

$line = FileRead($file)
if stringinstr($line, '778899') then run('a.exe')
这样应该也行

水木子 发表于 2014-12-22 11:50:12

#Include <File.au3>
$CountLines = _FileCountLines($file)
If $CountLines >= 778899 Then MsgBox(0, 0, $CountLines)
页: [1]
查看完整版本: filereadline