StringRegExp 正则获取 FileRead 中的匹配问题

afan

$a = FileRead(RegRead('HKLM\SOFTWARE\AutoIt v3\AutoIt', 'InstallDir') & '\Examples\_ReadMe_.txt')
MsgBox(0, 0, $a)
$gjz = '- thesnow.'
If StringRegExp($a, $gjz & '$') Then MsgBox(0, '方法1', '结尾仅含有关键字：' & $gjz)
If StringRegExp($a, '- thesnow\.$') Then MsgBox(0, '方法2', '结尾仅含有关键字：' & $gjz)
;需要判断是否仅含有关键字$gjz，以上方式均无效
$b = StringRegExp($a, '(.+)$', 3)
If Not @error And $b[0] = $gjz Then MsgBox(0, '方法3', '结尾仅含有关键字：' & $gjz)
;而这样判断又是正确的

不知是不是 FileRead 的Bug？

;=================以下10#已解决
感谢顽固不化、pusofalse的帮助~！

xlcwxl

afan的提问只能给你顶起，

afan

回复 2# xlcwxl


    还是先测试吧，呵呵

顽固不化

估计是表达式的问题。
把第四行改成：If StringRegExp($a, '(.+)$') Then MsgBox(0, '方法1', '结尾仅含有关键字：' & $gjz)
也能成功匹配。

afan

回复 4# 顽固不化


    我需要判断的是关键字$gjz，而不是任意字符，呵呵~

顽固不化

回复  顽固不化


    我需要判断的是关键字$gjz，而不是任意字符，呵呵~
afan 发表于 2009-12-26 23:06

用'(.+)$'返回的只有唯一的一个匹配。
关于$的使用，AU3帮助里没提及，似乎指一行的结尾？照此应该有几个匹配结果的。

afan

回复 6# 顽固不化


    $就是整个字符串的结尾，所以只有一个匹配~

也就是说我这个例子就是想判断结尾是否为"- thesnow."，不包含其它字符（含回车）

pusofalse

$匹配一行的行末位置，“行末”包含了回车符和换行符，"- thesnow\.$"之所以不能正确匹配，是因为这行只有"- thesnow."，而没有回车和换行。

afan

回复 8# pusofalse


    If StringRegExp($a, '- thesnow\.' & @CRLF & '$') Then MsgBox(0, '方法2', '结尾仅含有关键字：' & $gjz)

这样也不对?

顽固不化

似乎明白了，帮助说：
FileRead ( "文件句柄/文件名" [, 数量] )
参数
文件句柄/文件名 目标文件句柄,可由此前调用 FileOpen 函数的返回值获得.另外也可以直接使用目标文件名.
数量 [可选参数] 指定要读取字符的数量.默认读取整个文件.不使用则文件使用RAW模式读取.
..........
如果文件使用 Raw 模式=4 打开, 数量必须设置为扇区大小(512)的倍数.
...........

RAW模式是什么我不知道，但似乎读出的不完全等同于字符串。
如果转换一下，就可以啦。

$a = String(FileRead(RegRead('HKLM\SOFTWARE\AutoIt v3\AutoIt', 'InstallDir') & '\Examples\_ReadMe_.txt'))
MsgBox(0, 0, $a)
$gjz = '- thesnow.'
If StringRegExp($a, $gjz&'$' ) Then MsgBox(0, '方法1', '结尾仅含有关键字：' & $gjz)
If StringRegExp($a, '(- thesnow\.)$') Then MsgBox(0, '方法2', '结尾仅含有关键字：' & $gjz)
;以上方式均无效
$b = StringRegExp($a, '(.+)$', 3)
If Not @error And $b[0] = $gjz Then MsgBox(0, '方法3', '结尾仅含有关键字：' & $gjz)
;而这样判断又是正确的

afan

回复 10# 顽固不化


   
我检测到FileRead读取的字符串后面还附加了50个字符，但不知道是什么……
没想到原来还有这一茬，看来以后用FileRead还得留意一下~
非常感谢~！

顽固不化

回复  顽固不化


   
我检测到FileRead读取的字符串后面还附加了50个字符，但不知道是什么……
没想 ...
afan 发表于 2009-12-26 23:41

也是从你的问题中才注意到这问题，呵呵，与你一起进步~

afan

回复 12# 顽固不化


    本来只想减少一行代码，没想到唤醒了之前的未知错误，呵呵~