谢谢您的回答,能再具体一些吗?我想到了正则,但是我不太会用···作者: gezhirong 时间: 2011-2-16 16:32
Function reg(str1)
Set regex=new RegExp
regex.pattern="[a-z]+[0-9]+"
regex.ignorecase=true
regex.global=true
Set matchs=regex.execute(str1)
For each match in matchs
msgbox match
Next
End Function
str="IP: 222.27.50.*2011-02-16 17:38:04test001"
reg(str)作者: hsjzfling 时间: 2011-2-16 17:50
ls的回答是要保证lz要取的那个"test001"一定是以n个小写字母开头,后面跟着m个数字的字符串,具体的正则表达式需要lz分析目标字符串的变化范围才能确定下来作者: BesTesTer 时间: 2011-2-16 18:59
字符串中的IP地址和日期都是随机的,但是可以发现不管怎么变,字符串中都存在同一个字符":",且出现3次后就可以找到需要截取的字符串。还要考虑截取的所需字符串也可能出现":",实现的脚本如下:
Dim str : str = "IP: 222.27.50.*2011-02-16 17:38:04test001"
For i = 1 to len(str)
If Mid(str,i,1) = ":" Then
j = j+1
If j = 3 Then
Exit for
End If
End If
Next
Function regtest(strng,patrn)
Set regex=new regexp
regex.pattern=patrn
regex.global=true
regex.ignorecase=true
set matches=regex.execute(strng)
For each match in matches
regtest=match
Next
End Function作者: feiyunkai 时间: 2011-2-17 10:56
a="IP: 222.27.50.*2011-02-16 17:38:04test001"
b=split(a,":")
c=Mid(b(3),3,Len(b(3)))
MsgBox c作者: a598824322 时间: 2011-2-17 11:37
Function reg(str1)
Set regex=new RegExp
regex.pattern=":[0-9][0-9].*"
regex.ignorecase=true
regex.global=true
Set matchs=regex.execute(str1)
For each match in matchs
msgbox (mid(match,7))
Next
End Function
str="IP: 222.27.50.*2011-02-16 17:38:04y444444trwetrwe4001"
reg(str)作者: 小飞天猪 时间: 2011-2-18 10:38
非常感谢各位的大力帮助!!!
每个人的都写的很好,我试了几个,都很好,非常感谢啊···