本帖最后由 半芯竹 于 2014-12-28 13:23 编辑
#include<array.au3>
Local $a='ABCD-147258369x.lst ABCD-147258369-x.lst ABCD-147258369-v.lst ABCD-147258369v.lst ABCD-147258369.lst'
Local $b=StringRegExp($a,"\d{9}-?x",3)
If Not @error Then _ArrayDisplay($b)
以上均表示匹配带有X结尾的,不管带不带"-" ..均匹配.
#include<array.au3>
Local $a='ABCD-147258369x.lst ABCD-147258369-x.lst ABCD-147258369-v.lst ABCD-147258369v.lst ABCD-147258369.lst'
Local $b=StringRegExp($a,"\d{9}-?v",3)
If Not @error Then _ArrayDisplay($b)
以上均表示匹配带有v结尾的,不管带不带"-" ..均匹配.
#include<array.au3>
Local $a='ABCD-147258369x.lst ABCD-147258369-x.lst ABCD-147258369-v.lst ABCD-147258369v.lst ABCD-147258369.lst'
Local $b=StringRegExp($a,"\d{9}-?\w?",3)
If Not @error Then _ArrayDisplay($b)
以上均表示匹配所有的版本.
#include<array.au3>
Local $a='ABCD-147258369x.lst ABCD-147258369-x.lst ABCD-147258369-v.lst ABCD-147258369v.lst ABCD-147258369.lst'
Local $b=StringRegExp($a,"(\d{9})\.",3)
If Not @error Then _ArrayDisplay($b)
以上表示,只取纯数字版本.带X|V|-X|-V 等版本均不匹配
可能我不是很理解您所想要表达的东西..我不知道你想要的是不是这样的效果? |