匹配网址的正则_正则表达式

复制代码 代码如下:

Function IsValidUrl(str)   Dim regEx   Set regEx = New RegExp   regEx.Pattern = "http(s)?://([\w-]+\.)+[\w-]+(/[\w-./?%&=]*)?"   IsValidUrl = regEx.Test(str)  End Function 

查看更多关于匹配网址的正则_正则表达式的详细内容...