找回密码
 加入
搜索
查看: 3971|回复: 8

[AU3基础] 读取TXT文本的内容的问题

  [复制链接]
发表于 2011-7-3 21:57:15 | 显示全部楼层 |阅读模式
我现在有个表格,内容如下:
1,abc
2,defg
3,hijkl
4,mnopq

现在是想读取,后文本的内容,请问应该用那个函数才能方便读取呢?试过很多都没找到合适的。
发表于 2011-7-3 22:04:59 | 显示全部楼层
用FileReadLine,然用用StringRegExp正则处理下就可以了。
或者用StringSplit,用“,”作分隔符
 楼主| 发表于 2011-7-3 22:22:11 | 显示全部楼层
$1=StringInStr(FileReadLine($file,1),",",0,1,1,0) ,我这样写出来,但是读取不了,是为什么呢?
发表于 2011-7-3 22:27:10 | 显示全部楼层
#include <Array.au3>
$sText = '1,abc' & @CRLF & _
                '2,defg' & @CRLF & _
                '3,hijkl' & @CRLF & _
                '4,mnopq'

$aReg = StringRegExp($sText, '(?<=,)[^\r]+', 3)
_ArrayDisplay($aReg)
发表于 2011-7-3 22:33:56 | 显示全部楼层
回复 3# 196898810


    参数使用,要认真看帮助!(最后一个参数)

并且你用仅用StringInStr并不能达到你在一楼的目的
 楼主| 发表于 2011-7-3 23:44:17 | 显示全部楼层
如果我是读取一个txt文档,那应该要怎么样修改呢?数组的那个现在能用了,但是读取好像还不行
发表于 2011-7-3 23:52:44 | 显示全部楼层
回复 6# 196898810
第一行改为: $sText = FileRead('XXX.txt')
发表于 2011-7-4 09:14:14 | 显示全部楼层
Local $file = FileOpen("test.txt", 0)

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

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

FileClose($file)
看一下帮助里的这个例子!
发表于 2011-7-10 14:16:21 | 显示全部楼层
看到正则头就晕 加油学习
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-9-21 04:29 , Processed in 0.076015 second(s), 22 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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