论坛 › 『 提问交流 』 › txt文本字符串查找?

dk0521 发表于 2013-4-25 03:50:57

txt文本字符串查找?

想统计文本包含某个字符串的行总共有多少{:face (229):}

zch11230 发表于 2013-4-25 09:58:13

是这个意思么？$str = "jaklsdfjkljas123asdfhasjkdhfjkl" & @CRLF & _
                "asjklfjklasjd;f123asdf" & @CRLF & _
                "asjdklfjklasd" & @CRLF & _
                "as123df123" & @CRLF & _
                "asfdasdfasdfsdfasd" & @CRLF & _
                "asdfasdfasdfasd1231" & @CRLF & _
                "123asdfasdlkfjkl"
$array = StringRegExp($str, '(?m)^.*?123.*, 3)
MsgBox(0, "", "包含字符串123的行共有: " & UBound($array))

鸟人 发表于 2013-4-25 13:16:44

估计是这个意思吧，你少了个 ' 引号。
正则我是一窍不通。方便新手理解

Local $str = "jaklsdfjkljas123asdfhasjkdhfjkl" & @CRLF & _
                "asjklfjklasjd;f123asdf" & @CRLF & _
                "asjdklfjklasd" & @CRLF & _
                "as123df123" & @CRLF & _
                "asfdasdfasdfsdfasd" & @CRLF & _
                "asdfasdfasdfasd1231" & @CRLF & _
                "123asdfasdlkfjkl"
Local $nStr='123' ;要搜索的字符串
Local $array = StringRegExp($str, '(?m)^.*?'&$nStr&'.*', 3)
MsgBox(0, "", "包含字符串 "&$nStr&" 的行共有: " & UBound($array))

zch11230 发表于 2013-4-25 16:35:46

回复 3# 鸟人

多谢提醒不知在哪一步复制掉了 本来是这么写的 其实直接用 .*123.*就可以达到效果了。
    $array = StringRegExp($str, '(?m)^.*?123.*$', 3)

查看完整版本: txt文本字符串查找?