196898810 发表于 2011-7-3 21:57:15

读取TXT文本的内容的问题

我现在有个表格，内容如下：
1，abc
2，defg
3，hijkl
4，mnopq

现在是想读取，后文本的内容，请问应该用那个函数才能方便读取呢？试过很多都没找到合适的。

happytc 发表于 2011-7-3 22:04:59

用FileReadLine，然用用StringRegExp正则处理下就可以了。
或者用StringSplit，用“，”作分隔符

196898810 发表于 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)

happytc 发表于 2011-7-3 22:33:56

回复 3# 196898810


    参数使用，要认真看帮助！（最后一个参数）

并且你用仅用StringInStr并不能达到你在一楼的目的

196898810 发表于 2011-7-3 23:44:17

如果我是读取一个txt文档，那应该要怎么样修改呢？数组的那个现在能用了，但是读取好像还不行

水木子 发表于 2011-7-3 23:52:44

回复 6# 196898810
第一行改为： $sText = FileRead('XXX.txt')

hzxymkb 发表于 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)
看一下帮助里的这个例子！

ayumi502 发表于 2011-7-10 14:16:21

看到正则头就晕 加油学习
页: [1]
查看完整版本: 读取TXT文本的内容的问题