当前位置: 编程技术>其它
[asp]匹配网址的正则
来源: 互联网 发布时间:2014-10-14
本文导语: 代码如下:Function IsValidUrl(/tech-program-other/str/index.html) Dim regEx Set regEx = New RegExp regEx.Pattern = "http(s)?://([w-]+.)+[w-]+(/[w-./?%&=]*)?" IsValidUrl = regEx.Test(str) End Function
代码如下:
Function IsValidUrl(/tech-program-other/str/index.html)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "http(s)?://([w-]+.)+[w-]+(/[w-./?%&=]*)?"
IsValidUrl = regEx.Test(str)
End Function