找回密码
 加入
搜索
查看: 1641|回复: 2

如何获得_FileReadToArray不同数组中的文本内容?

[复制链接]
发表于 2009-2-5 11:56:29 | 显示全部楼层 |阅读模式
#include <Array.au3>
#include <file.au3>

Dim $UpTXT_temp
Dim $UpDirArray[4] = ["","200802","200805","200901"]
        For $i = 1 To 3
        $FindTXT = FileFindFirstFile("D:\" & $UpDirArray[$i] & "\*.txt")  
                If $FindTXT = -1 Then
                        MsgBox(0,"","没发现文件!")
                        Exit
                EndIf
                        While 1
                        $FindFile = FileFindNextFile($FindTXT)
                        If @error Then ExitLoop
                        _FileReadToArray("D:\" & $UpDirArray[$i] &"\"& $FindFile, $UpTXT_temp)
                        ;
                        WEnd
                FileClose($FindTXT)
        Next

    查找D:\(200802,200805,200901)三个目录下的文本文件(假设都只有一个),赋于数组。想得到每个文本文件的数组内容,请问应该如何做?可不可以保存到如$A1,$A2,$A3……最后用$A1[3]便可保存第一个文本中第三行的内容?

[ 本帖最后由 雨林GG 于 2009-2-5 21:39 编辑 ]
发表于 2009-2-5 20:20:46 | 显示全部楼层
既然找到文件了,按一般文件打开就是了。打开并操作一个文件与平时没有两样。
 楼主| 发表于 2009-2-5 20:56:03 | 显示全部楼层
For...Next 后查到的三个文件都到数组$UpTXT_temp中了,最后只留下最后一个文本文件的信息.我想当搜到每一个文件得到的数组分别保存,就是如何将$UpTXT_temp 赋于类似于$a1,$a2,$a3这样的新数组!

可以用$a[1],$a[2],$a[3]来得到每个数组,但俺不知道如何表示这个一维数组中每行的值!~~~


好像不行!用笨方法吧!先保存好得到的$a[1],$a[2],$a[3],然后再用_ArrayToString & StringSplit来转换吧!

结了吧~!

[ 本帖最后由 雨林GG 于 2009-2-5 21:39 编辑 ]
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-18 20:31 , Processed in 0.071460 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表