ASP验证email邮箱与网址的2个正则函数

现在注册的时候都用email邮箱,那么验证邮箱的正确性就是我们必须要做的,还有网址,我们有时候也需要验证输入的网址是否正确,下面编程之家跟大家分享:ASP验证email邮箱与网址的2个正则函数

ASP验证email邮箱的正则函数

Function IsValidEmail(str) 

Dim regEx 

Set regEx = New RegExp 

regEx.Pattern = "[w-.]+@[A-Za-z0-9]+.(([A-Za-z0-9]{2,4})|([A-Za-z0-9]{2,4}.[A-Za-z]{2,4}))$" 

IsValidEmail = regEx.Test(str) 

End Function

ASP验证网址的正则函数

Function IsValidUrl(str) 

Dim regEx 

Set regEx = New RegExp 

regEx.Pattern = "http(s)?://([w-]+.)+[w-]+(/[w-./?%&=]*)?" 

IsValidUrl = regEx.Test(str) 

End Function

需要的小伙伴们可以直接拿去用哦。

相关文章

数组的定义 Dim MyArray MyArray = Array(1‚5‚123‚12‚98...
\'参数: \'code:要检测的代码 \'leixing:html或者ubb \'n...
演示效果: 代码下载: 点击下载
环境:winxp sp2 ,mysql5.0.18,mysql odbc 3.51 driver 表采...
其实说起AJAX的初级应用是非常简单的,通俗的说就是客户端(j...
<% ’判断文件名是否合法 Function isFilename(aFilename...