当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的检查输入email是否合法程序

ASP
ASP限制只能中文输入的方法
获得jpg文件的实际尺寸
关于页面缓存清除的方法小结
如何更好更快的debug
ASP中缓冲的启用及执行速度的影响
处理二进制数据
如何读出空格
排序方式解决“上下主题”问题(一)
排序方式解决“上下主题”问题(二)
排序方式解决“上下主题”问题(三)
关于ACCESS 2K与ASP的几点想法
提高IIS的安全性
ASP3.0中的流控制能力(1)
ASP3.0中的流控制能力(2)
ASP3.0中的流控制能力(3)
关于JMAIL如何在收件人处指定多个收件人
个人经验:使用asp尽量减少服务器端的工作量
分行模块,自动识别英文和型号数
用IIS+ASP建网站的安全性分析
迁移到 ASP .NET:需考虑的重要问题(1)

ASP 中的 简单的检查输入email是否合法程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 69 ::
收藏到网摘: n/a

  function chkEmail(email)
      on error resume next
      dim i,l,pos1,pos2
      chkEmail=true
      if isnull(email) then chkEmail=false:exit function
      pos1= instr(email,"@")
      pos2=instrRev(email,".")
      if not(pos1>0) or not (pos2>0) or pos1>pos2 then             
         chkEmail=false
      end if
      if err.number<>0 then err.clear
  end function