[asp]匹配网址的正则
复制代码 代码如下:
Function IsValidUrl(str)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "http(s)?://([\w-]+\.)+[\w-]+(/[\w-./?%&=]*)?"
IsValidUrl = regEx.Test(str)
End Function
Function IsValidUrl(str)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "http(s)?://([\w-]+\.)+[\w-]+(/[\w-./?%&=]*)?"
IsValidUrl = regEx.Test(str)
End Function
转载请说明出处
知优网 » [asp]匹配网址的正则(正则匹配网址链接)
知优网 » [asp]匹配网址的正则(正则匹配网址链接)