繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用vbscript判断email地址的合法性
- ASP
- 深入研究Application和Session对象(2)
- 深入研究Application和Session对象(3)
- 开始 .Net的旅程（一）
- 开始 .Net的旅程（二）
- 手把手教你使用VB来创建ASP组件(1)
- 手把手教你使用VB来创建ASP组件(2)
- 手把手教你使用VB来创建ASP组件(3)
- 手把手教你使用VB来创建ASP组件(4)
- 手把手教你使用VB来创建ASP组件(5)
- 手把手教你使用VB来创建ASP组件(6)
- 手把手教你使用VB来创建ASP组件(7)
- 手把手教你使用Java来编写ASP组件(1)
- 手把手教你使用Java来编写ASP组件(2)
- 手把手教你使用Java来编写ASP组件(3)
- 手把手教你使用Java来编写ASP组件(4)
- 手把手教你使用Java来编写ASP组件(5)
- 手把手教你使用Java来编写ASP组件(6)
- ASP 3.0高级编程（二十四）
- ASP 3.0高级编程（二十五）
- ASP 3.0高级编程（二十六）
ASP 中的 用vbscript判断email地址的合法性
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 104 ::
收藏到网摘: n/a
<%
Function isemail(strng)
isemail = false
Dim regEx, Match ' Create variables.
Set regEx = New RegExp ' Create a regular expression object (stupid, huh?)
regEx.Pattern = "^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$" ' Sets pattern.
regEx.IgnoreCase = True ' Set case insensitivity.
Set Match = regEx.Execute(strng) ' Execute search.
if match.count then isemail= true
End Function
%＞
评论 (0) All
