asp函数之获取字符串中的时间字符串
点击次数:52 次 发布日期:2008-09-18 15:09:00 作者:源代码网
|
源代码网推荐源代码网整理以下由于时间在字符串中的值不一致性,会出现以下几中格式的字符串,没有办法用left,right,mid直接来获取,所以想到用正则表达式来实现这个功能(只要将这个功能改一下,就可以获取其他格式的字符串。
源代码网整理以下
<% "str = "2007-01-01 12:12:12 问题 1234" "str="sdfd 01-01 12:12:12 问题" "str="2007-01-01 12:12sdfdf" "str="qqwq 01-01 13:14dddd" str="a2007-01-01sdddd"
patrn="(d+[-:s])+d+" Response.Write(RegExpTest(patrn,str))
Function RegExpTest(patrn, strng) Dim regEx, Match, Matches " 建立变量。 Set regEx = New RegExp " 建立正则表达式。 regEx.Pattern = patrn " 设置模式。 regEx.IgnoreCase = True " 设置是否区分大小写。 regEx.Global = True " 设置全局替换。 Set Matches = regEx.Execute(strng) " 执行搜索。 For Each Match in Matches " 遍历 Matches 集合。 RetStr = Match.Value Next RegExpTest = RetStr end Function %> |
源代码网供稿. |