qq58945591 发表于 2009-8-16 21:46:38

如何从文本循环读取并赋值给变量并输出?

本帖最后由 qq58945591 于 2009-8-17 02:10 编辑

从某文本内循环读取每一行作为参数递给msgbox输出.

假设文件名list.ini内容如下
aa.txt
bb.txt
cc.txt
dd.txt
......(未知行数)



现在要求如下,从list.ini里循环读取每一行的值,并用msgbox输出,直到读取到最后一行,脚本完成并退出.




要求其实很简单,只是想不起该怎么写这个代码了.批处理里for就很容易做到,很久没摸au3了,不知道怎么写了.

afan 发表于 2009-8-16 22:08:16

$a = FileOpen('list.ini', 0)
While 1
        $l = FileReadLine($a)
        If @error Then ExitLoop
        MsgBox(0, 0, $l)
WEnd
FileClose($a)

netegg 发表于 2009-8-17 00:35:55

$a = FileOpen('list.ini', 0)
While 1
        $l = FileReadLine($a)
        If @error Then ExitLoop
        MsgBox(0, 0, $l)
WEnd
FileClose($a)
afan 发表于 2009-8-16 22:08 http://www.autoitx.com/images/common/back.gif
老大，这样要弹出多少个消息框呀

netegg 发表于 2009-8-17 00:41:36

本帖最后由 netegg 于 2009-8-17 00:43 编辑

$a = FileOpen('list.ini', 0)
$i = FileReadLine($a,1)
$m = 2
While 1
      $l = FileReadLine($a, $m)
      If @error Then ExitLoop
      $i = $i & @CRLF & $l
      $m=$m+1
WEnd
FileClose($a)
MsgBox(0, 0, $i)

afan 发表于 2009-8-17 00:45:12

本帖最后由 afan 于 2009-8-17 00:46 编辑

$i =$a = FileOpen('list.ini', 0)
FileReadLine($a,1)
$m = 2
While 1
      $l = FileReadLine($a, $m)
      If @error Then ExitLoop
      $i = $i & @CRLF & $l
      $m=$m+1
WEnd
FileCl ...
netegg 发表于 2009-8-17 00:41 http://www.autoitx.com/images/common/back.gif

老大，我想他就是要一个个弹出（调试）吧，不然 Msgbox(0,0,FileRead('list.ini')) 不就行了。。。。。

qq58945591 发表于 2009-8-17 01:50:37

感谢楼上两位，输出为msgbox只是调试而已。

我只想把读取到的值作为另外一条命令里的参数变量而已。
页: [1]
查看完整版本: 如何从文本循环读取并赋值给变量并输出?