您现在的位置是:网站首页> 编程资料编程资料

[asp]匹配网址的正则_正则表达式_

2023-05-25 288人已围观

简介 [asp]匹配网址的正则_正则表达式_

复制代码 代码如下:

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

-六神源码网