求读取记事本内容并写入到窗口的办法！本人菜鸟！

qwe2022 · 发表于 2009-7-22 10:22:07

本帖最后由 qwe2022 于 2009-7-24 20:45 编辑

已经解决谢谢！

lynfr8 · 发表于 2009-7-22 10:54:07

1.FileReadLine
--------------------------------------------------------------------------------
从此前已打开的文本文件中读取指定行的字符.
FileReadLine ( 文件句柄或 "文件名" [, 行号] )

$file = FileOpen("D:\aaa.txt", 0)
If $file = -1 Then; 检查打开的文件是否可读
    MsgBox(0, "错误", "不能打开文件.")
    Exit
EndIf

While 1; 每次读取一行文本,直到文件结束.
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    MsgBox(0, "读取的行:", $line&@CRLF&@CRLF&@CRLF)
Wend
FileClose($file)

2.用UDF写入数组

#include <file.au3>
Dim $aRecords
If Not _FileReadToArray("D:\aaa.txt",$aRecords) Then
MsgBox(4096,"Error", " error:" & @error)
Exit
EndIf
For $x = 1 to $aRecords[0]
Msgbox(0,'Record:' & $x, $aRecords[$x]&@CRLF&@CRLF&@CRLF)
Next

qwe2022 · 发表于 2009-7-22 11:24:57

您好lynfr8 ，请问我能直接联系您的QQ吗？还是有些不对！谢谢了！我的QQ：9311647 nb-cat

qwe2022 · 发表于 2009-7-22 11:27:56

2# lynfr8
您好lynfr8 ，请问我能直接联系您的QQ吗？还是有些不对！谢谢了！我的QQ：9311647 nb-cat

lynfr8 · 发表于 2009-7-22 11:51:26

很少上Q，有问题在坛子问吧
这里大家都可以为你解答

afan · 发表于 2009-7-22 11:53:02

2种方法都ok

qwe2022 · 发表于 2009-7-22 14:55:55

本帖最后由 qwe2022 于 2009-7-24 20:46 编辑

已经解决谢谢！

qwe2022 · 发表于 2009-7-22 15:23:44

看样子我一时也说不清楚！我录像做一份吧，我演示给大家，希望帮忙写个au3！

qwe2022 · 发表于 2009-7-22 15:46:35

本帖最后由 qwe2022 于 2009-7-24 20:46 编辑

已经解决谢谢！

qwe2022 · 发表于 2009-7-24 20:09:58

谁帮帮我吧

afan · 发表于 2009-7-24 20:42:41

录像看不了的

		自动登录	找回密码
密码			加入