已经可以了,谢谢,必须放在文件里面,谢谢各位 #include <Array.au3>
Local $file = FileOpen("F:\1.txt", 0)
If $file = -1 Then Exit
Local $chars = FileRead($file)
If @error = -1 Then Exit
Local $res = StringRegExp($chars,"[^\s].*\S{20,}",3)
If Not @error Then _arraydisplay($res,'test')
FileClose($file)
半芯竹 发表于 2015-1-7 21:14 http://www.autoitx.com/images/common/back.gif
这个也还是有啊 回复 14# bihex
#include <array.au3>
Dim $string, $aStr
$string = _
'商品信息 单价 操作' & @CRLF & _
' 【1组2瓶装】油污净厨房去油强力抽油烟机清洗剂去重油污清洁剂' & @CRLF & _
' 掌柜:太美环宝青岛专卖店' & @CRLF & _
' 店铺详情>>'
$aStr = StringRegExp(StringStripWS($string, 8), "(?s)操作(.*?)掌柜", 3)
_ArrayDisplay($aStr)
页:
1
[2]